Error in if (type == "Date" || type == "yearmon" || type == "yearqtr") temp = as.Date(temp) :

[ejlamarque]

Hi, I have this error. Somebody could help to deal with it please?
In Charting the Santa Claus Rally

plota.test()
Error in if (type == "Date" || type == "yearmon" || type == "yearqtr") temp = as.Date(temp) :
missing value where TRUE/FALSE needed
Called from: index.xts(y1)
When I try to run some parts of the code I found the same error.
Buy the way this is still working for somebody? I have lots of code not working.
There is some instructions step by step? Thank you

[systematicinvestor]

Please try updating SIT and SIT.date packages

devtools::install_github('systematicinvestor/SIT.date')
curl::curl_download('https://github.com/systematicinvestor/SIT/raw/master/SIT.tar.gz', 'SIT.tar.gz',mode = 'wb',quiet=T)
install.packages('SIT.tar.gz', repos = NULL, type='source')

If you still get some warnings regarding indexClass, please install development version of xts and quantmod packages:

devtools::install_github('joshuaulrich/xts')
devtools::install_github('joshuaulrich/quantmod')

[ejlamarque]

Hello. Thank you very much for your support. I am a newbie learner of R and I am amazed by your job (All of them and your codes)
Well, The tools that you suggested seem to work because I pass this step, but now I have the following errors that I don't know if there are related or not but always stack I am.

I run this:

find prices in December

dates = index(prices)
years = date.year(dates)
index = which(date.month(dates) == 12)

rearrange data in trading days

trading.days = sapply(tapply(ret[index,], years[index], function(x) coredata(x)), function(x) x[1:22])

and I returned this:

find prices in December

dates = index(prices)
years = date.year(dates)
Error in as.POSIXlt.numeric(dates) : 'origin' must be supplied
index = which(date.month(dates) == 12)
Error in as.POSIXlt.numeric(dates) : 'origin' must be supplied

rearrange data in trading days

trading.days = sapply(tapply(ret[index,], years[index], function(x) coredata(x)), function(x) x[1:22])
Error in tapply(ret[index, ], years[index], function(x) coredata(x)) :
object 'years' not found
Suggestions?

[ejlamarque]

Now work perfectly. Thank you for your help. You can close the Issue.