He intentado CorrelationFunction[Transpose[{data,data}]][[All,1,2]] ¡pero no funciona! Es decir, los resultados son idénticos a los que se obtienen si se ejecuta CorrelationFunction[data] .
Respuesta
¿Demasiados anuncios?
DavLink
Puntos
101
Hace mucho tiempo que no juego con Mathematica, y sólo he echado un vistazo rápido en Google, pero ¿no se puede usar simplemente (aquí con algunos datos falsos)
x = Table[Sin[x] + 0.2 RandomReal[], {x, -4, 4, .1}];
ListPlot[x, DataRange -> {-4, 4}]
la función ListCorrelate ?
acf = ListCorrelate[x, x, {1, 1}, 0]
ListPlot[acf, Filling -> Axis]
