Displaying 1 result from an estimated 1 matches for "myvscal".
Did you mean:
myvscan
2011 Jun 03
2
tkrplot Newbie
...bjects.
I have the code I used from
## http://bioinf.wehi.edu.au/~wettenhall/RTclTkExamples/tkrplot.html :
##
require(quantmod)
require(tcltk)
library(tkrplot)
Sys.setenv(TZ="GMT")
getSymbols("^GSPC", from = "1960-01-01")
Myhscale <- 2.5 # Horizontal scaling
Myvscale <- 1.25 # Vertical scaling
plotFunction <- function(x)
{
params <- par(bg="white")
plot(x,main="A time series")
par(params)
}
tt <- tktoplevel()
tkwm.title(tt,"Time Series")
img <- tkrplot(tt,fun=plotFunction((Cl(GSPC))),hscale=Myhsc...