Opened 8 years ago
Last modified 8 years ago
#1955 new enhancement
tolRlink: Tratar la comunicación entre TOL y R de series en el dominio de las horas
Reported by: | Pedro Gea | Owned by: | Pedro Gea |
---|---|---|---|
Priority: | normal | Milestone: | Mantainance |
Component: | R API | Version: | 3.4 |
Severity: | normal | Keywords: | |
Cc: | jsperez |
Description
Se solicita tratar, de alguna manera, la comunicación entre TOL y R de series temporales cuyo fechado contiene instantes en el dominio de las fechas con horas, minutos y segundos.
Ya que actualmente, las clases "Serie" y "Dating" de R (introducidas en tolBasis) no admiten "fechas con horas" y si intentan recuperarse series horarias desde TOL se obtienen errores del tipo:
Error en ... : Fractional dates are found.
Change History (4)
comment:1 Changed 8 years ago by
comment:2 Changed 8 years ago by
(In [7462]) Refs #1955
Se amplía el método tolGet admitiendo opcionalmente argumentos del tipo classes.<Grammar>
que faciliten la gestión del tipo de clase de R utilizada en la salida.
Se revisa el submétodo tolGetDate all obtener "fechas con horas" para ajustar la precisión a las centésimas de segundo que utiliza TOL.
Se incorpora la opción classes.Date a tolGetDate pudiendo usarse las clases "Date", "POSIXct" y "POSIXlt".
Se renombra, por coherencia, el submétodo tolGetDating a tolGetTimeSet.
Se incorpora la opción classes.TimeSet a tolGetTimeSet con las clases "Dating" y "POSIXct".
Se incorpora la opción classes.Serie a tolGetSerie con las clases "Serie" y "xts".
Se incorpora el uso de estas opciones adicionales en tolGetSet y tolGetAnything.
comment:3 Changed 8 years ago by
comment:4 Changed 8 years ago by
Type: | defect → enhancement |
---|
Expresiones como:
serD <- tolEval('SubSer(Gaussian(0,1,Daily), Today-240,Today)',grammar='Serie') serH <- tolEval('SubSer(Gaussian(0,1,Hourly),Today-10, Now )',grammar='Serie')
ya funcionan sin problemas.
Para obtener la serie serD
como xts
hay que usar un argumento adicional:
serD <- tolEval('SubSer(Gaussian(0,1,Daily), Today-240,Today)',grammar='Serie',classes.Serie="xts")
El envío de series en xts también funciona de R a TOL. Por ejemplo:
tolExecute("AvrS", serH) # == mean(serH)
La propuesta queda como: