Discusión sobre el artículo "Tercera generación de neuroredes: "Neuroredes profundas"" - página 12
Está perdiendo oportunidades comerciales:
- Aplicaciones de trading gratuitas
- 8 000+ señales para copiar
- Noticias económicas para analizar los mercados financieros
Registro
Entrada
Usted acepta la política del sitio web y las condiciones de uso
Si no tiene cuenta de usuario, regístrese
Vladimir Perervenko
Añadir al artículo información adicional sobre el trabajo con R Studio
Buenas tardes.
No entiendo lo del archivo hosts. ¿Puedes darme más detalles?
Suerte
Vladimir Perervenko
Añadir al artículo información adicional sobre el trabajo con R Studio
Yo uso otra forma de registro para comprobar los paquetes instalados:
Debes cargar las librerías en la descripción de las funciones que las utilizan. Aunque puedes hacerlo así al inicializar el Asesor Experto.
Entonces, ¿por qué necesitas ejecutar el Asesor Experto en el probador?
Suerte
Mientras que la depuración de secuencias de comandos R durante mucho tiempo, identificado un error que es difícil de atrapar si los datos entrantes tiene NA. Simplemente no se activará la señal. En el archivo "e_SAE_init.r", se recomienda añadir un término de limpieza NA a la función Test(dt,x) antes de new.data <- predict(prepr, tail(x, 50)): x <- na.omit(x);
Esto parece una "muletilla", pero aún no se me ha ocurrido nada mejor.
Sin ella, se producirá un error oculto:
Error en if (sqrt(denom) > .Machine$double.eps) x/sqrt(denom) else x * : valor omitido donde se necesita TRUE/FALSE
Mientras que la depuración de secuencias de comandos R durante mucho tiempo, identificado un error que es difícil de atrapar si los datos entrantes tiene NA. Simplemente no se activará la señal. En el archivo "e_SAE_init.r", se recomienda añadir un término de limpieza NA a la función Test(dt,x) antes de new.data <- predict(prepr, tail(x, 50)): x <- na.omit(x);
Esto parece una "muletilla", pero aún no se me ha ocurrido nada mejor.
Sin ella, se producirá un error oculto:
Error en if (sqrt(denom) > .Machine$double.eps) x/sqrt(denom) else x * : valor omitido donde se necesita TRUE/FALSE
Mientras depuraba scripts de R durante mucho tiempo, encontré un error que es difícil de detectar si los datos entrantes tienen NA. Simplemente no se activará la señal. En el archivo "e_SAE_init.r", se recomienda añadir un término de limpieza NA a la función Test(dt,x) antes de new.data <- predict(prepr, tail(x, 50)): x <- na.omit(x);
Esto parece una "muletilla", pero aún no se me ha ocurrido nada mejor.
Sin ella, se producirá un error oculto:
Error en if (sqrt(denom) > .Machine$double.eps) x/sqrt(denom) else x * : valor omitido donde se necesita TRUE/FALSE.
Esta afirmación es incorrecta.
En la función Test(dt, x), x son los datos de entrada calculados por la función In(). Veámoslo en el script "i_SAE_fun.r
In <- function(p = 16){ require(TTR) adx <- ADX(price, n = p) ar <- aroon(price[ ,c('High', 'Low')], n = p)[ ,'oscillator'] cci <- CCI(price[ ,2:4], n = p) chv <- chaikinVolatility(price[ ,2:4], n = p) cmo <- CMO(price[ ,'Med'], n = p) macd <- MACD(price[ ,'Med'], 12, 26, 9)[ ,'macd'] osma <- macd - MACD(price[ ,'Med'],12, 26, 9)[ ,'signal'] rsi <- RSI(price[ ,'Med'], n = p) stoh <- stoch(price[ ,2:4], 14, 3, 3) smi <- SMI(price[ ,2:4],n = p, nFast = 2, nSlow = 25, nSig = 9) vol <- volatility(price[ ,1:4], n = p, calc="yang.zhang", N=96) In <- cbind(adx, ar, cci, chv, cmo, macd, osma, rsi, stoh, smi, vol) return(In) }Se trata de una serie de indicadores. Vamos a calcularlos sobre el histórico price[] con la longitud de 2000 barras.
Cortamos los datos indefinidos. Condición : nrow(x) > 500 + max(NA). Es decir, al menos en nuestro caso 533. Para estar seguros, pon nrow(x) = 600-700.
No entiendo como tienes un NA incierto en x.
Suerte
HI Vladimir,
¡¡¡Aquí es de Brasil!!!
He leído sus instrucciones sobre la red neuronal utilizando R, pero tengo una pregunta tonta (lo siento, soy novato en esto!)
En el tutorial que escribió ( https://www.mql5.com/es/articles/1103#ch_3), en la"Sección 3.3.1 - Datos de origen" que describe una función, llamada pr.OHLC que he entendido muy bien.
Pero usted muestra algunos resultados que no estaba claro para mí cuáles son los parámetros necesarios para los resultados a continuación
> head(price) Open High Low Close Med CO [1,] 1.33848 1.33851 1.33824 1.33844 1.338375 -4e-05 [2,] 1.33843 1.33868 1.33842 1.33851 1.338550 8e-05 [3,] 1.33849 1.33862 1.33846 1.33859 1.338540 1e-04 [4,] 1.33858 1.33861 1.33856 1.33859 1.338585 1e-05 [5,] 1.33862 1.33868 1.33855 1.33855 1.338615 -7e-05¿Podrías, por favor, ayudarme con esto?
Saludos,
Fábio
HI Vladimir,
¡¡¡Aquí es de Brasil!!!
He leído sus instrucciones sobre la red neuronal utilizando R, pero tengo una pregunta tonta (lo siento, soy novato en esto!)
En el tutorial que escribió ( https://www.mql5.com/es/articles/1103#ch_3), en la"Sección 3.3.1 - Datos de origen" que describe una función, llamada pr.OHLC que he entendido muy bien.
Pero usted muestra algunos resultados que no estaba claro para mí cuáles son los parámetros necesarios para los resultados a continuación
¿Podrías, por favor, ayudarme con esto?
Saludos,
Fábio
Hola Fabio
¿Qué es lo que no está claro?
pr.OHLC <- function (o, h, l, c) { #Unite quote vectors into a matrix having previously expanded them #Indexing of time series of vectors in R starts with 1. #Direction of indexing is from old to new ones. price <- cbind(Open = rev(o), High = rev(h), Low = rev(l), Close = rev(c)) Med <- (price[, 2] + price[, 3])/2 #We calculate average price (HIgh + Low)/2 CO <- price[, 4] - price[, 1] # We calculate body candles (Close - Open) #add Med and CO to the matrix price <- cbind(price, Med, CO)#We are putting it all in a matrix }Hola Vladimir,
¿Existe la posibilidad de tener los archivos para MT5?
Saludos
Fabio lima
Hola Vladimir,
¿Existe la posibilidad de tener los archivos para MT5?
Saludos
Fabio lima
Hola Fabio
Lo siento.
No escribo sobre MKL5.
Saludos cordiales
Vladimir
Una pregunta . No tengo claro el orden del vector precio .
Usted hace una inversión aquí: precio <- cbind(Open = rev(o), High = rev(h), Low = rev(l), Close = rev(c))
¿Cuál es el orden original de o,h,l,c ?
Una pregunta . No tengo claro el orden del vector precio .
Usted hace una inversión aquí: precio <- cbind(Open = rev(o), High = rev(h), Low = rev(l), Close = rev(c))
¿Cuál es el orden original de o,h,l,c ?
Hola,
Las barras de numeración MT4 de la más reciente a la más antigua. El R por el contrario, de la antigua a la nueva, nueva barra pasado.