iffranciscome / roandaapi Goto Github PK

Dear IFFranciscoME:
I have problem when I use HisPrices from example code, R show :
Error in $<-.data.frame(*tmp*, "time", value = character(0)) :
replacement has 0 rows, data has 1
How can I fix it?
Best wish,
FreedomTrail

Over the weekend, the ActualPrice function returns the current date as opposed to the date the instrument last traded. For example, calling the ActualPrice function on a Saturday will return Saturday's date instead of the last date (the previous Friday usually) when the instrument traded.

The fix is straightforward and included below. Don't bother calling as.POSIXct when it isn't used later anyway.

Replace the line below...
DateTime <- as.POSIXct(substr(InstPrecjson[[1]]$time,12,19), format = "%H:%M:%S")

... with this line.
DateTime <- substr(InstPrecjson[[1]]$time,1,19)

Hi,

I am following your install instructions and am getting the following issues:

InstList <- data.frame(InstrumentsList(AccountType,Token,AccountID))[,c(1,3)]
Show Traceback

Error in colnames<-(*tmp*, value = c("Instrument", "DisplayName", :
'names' attribute [4] must be the same length as the vector [3] > Instrument <- InstList[117,1]
Error: object 'InstList' not found

PastPriceAPI <- HisPrices(AccountType,Granularity,DayAlign,TimeAlign,Token,Instrument,Start,End)
Error in HisPrices(AccountType, Granularity, DayAlign, TimeAlign, Token, :
argument "Count" is missing, with no default
?HisPrices
No documentation for ‘HisPrices’ in specified packages and libraries:
you could try ‘??HisPrices’

I am specifically interested in intraday historical prices, but can't find any documentation. I am also wondering where to find accountID as I suspect this is incorrect.

Your assistance is greatly appreciated.
Fakir

Getting error at this point -
InstList <- data.frame(InstrumentsList(AccountType,Token,AccountID))[,c(1,3)]
The error is -
'names' attribute [4] must be the same length as the vector [3]

Can anyone help me out?
Thanks in advance.

Thank you for building the code.

I have one problem using your code to modify an existing order. It seems httpOPTIONS is not the function to make PATCH request. Could you please advise what I did wrong or revise the code? Thanks! The following is the error message I have got:

                                                                                 Server 
                                                                    "openresty/1.7.0.1" 
                                                                                   Date 
                                                        "Tue, 05 Jul 2016 02:35:26 GMT" 
                                                                           Content-Type 
                                                                     "application/json" 
                                                                         Content-Length 
                                                                                    "0" 
                                                                             Connection 
                                                                           "keep-alive" 
                                                           Access-Control-Allow-Headers 

"Accept, Authorization, Content-Type, Origin, X-Accept-DateTime-Format, X-HTTP-Method-Override"
Access-Control-Allow-Methods
"GET, PATCH, DELETE, OPTIONS"
Access-Control-Max-Age
"86400"
status
"204"
statusMessage
"NO_CONTENT\r\n"
Warning messages:
1: In mapCurlOptNames(names(.els), asNames = TRUE) :
Unrecognized CURL options: .params
2: In mapCurlOptNames(names(.els), asNames = TRUE) :
Unrecognized CURL options: .params

Thank you for writing this code. I am using the v20 REST API and your functions use the v1 server. Can you add the capability to select the v20 Oanda server? Thank you.

Call method HisPrice with this parameters (for example):

HisPrices(AccountType="practice", Count=2, DayAlign=17, Granularity="D", Instrument="EUR_USD", TimeAlign="America%2FMexico_City", Token="23lkj23l4j2l4j2l34j2l4j-mytoken")

always return "Warning messages":

Warning messages:
1: In strptime(xx, f <- "%Y-%m-%d %H:%M:%OS", tz = tz) :
unknown timezone '%d/%m/%y %H:%M:%S'
2: In as.POSIXct.POSIXlt(x) : unknown timezone '%d/%m/%y %H:%M:%S'
3: In strptime(x, f, tz = tz) : unknown timezone '%d/%m/%y %H:%M:%S'
4: In as.POSIXct.POSIXlt(as.POSIXlt(x, tz, ...), tz, ...) :
unknown timezone '%d/%m/%y %H:%M:%S'
5: In as.POSIXlt.POSIXct(x, tz) : unknown timezone '%d/%m/%y %H:%M:%S'

It's easy to solve replace in line 122:

Prices$TimeStamp <- as.POSIXct(Prices$TimeStamp,"%d/%m/%y %H:%M:%S",origin="1970-01-01") 

to

Prices$TimeStamp <- as.POSIXct(strptime(Prices$TimeStamp, "%Y-%m-%d %H:%M:%OS"),origin="1970-01-01")

but I'm not sure if it's my R configuration problem

Dear IFFranciscoME:
Thank you for this wrapper, it is fantastic -- only problem that I am facing is that when I use InstrumentsList, an error appears:

Error in names(x) <- value : 
  'names' attribute [4] must be the same length as the vector [3]
Called from: `colnames<-`(`*tmp*`, value = c("Instrument", "DisplayName", 
    "PipSize", "MaxTradeUnits"))

I have narrowed it down to this particular line in the function:

QueryInst1 <- getURL(QueryInst,cainfo=system.file("CurlSSL","cacert.pem",
                                                    package="RCurl"),httpheader=auth)

Do you have any idea how I can fix it?

Really appreciate your effort!

Best wishes,
Henrywjr