Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
129.99 59.99 49.99 84.99 179.99 329.99 25.99 499.99 89.99 119.99 79.99 199.99 449.99 549.99 529.99 639.99 749.99 399.99 169.99 189.99 199.99 69.99 69.99 109.99 159.99 159.99 199.99 75 349.99 439.99 309.99 379.99 349.99 169.99 239.99 229.99 69.99 99.99 29.99 39.99 21.99 499.99 29.99 29.99 49.99 49.99 55.99 59.99 79.99 139.99 159.99 169.99 229.99 249.99 309.99 499.99 65.99 89.99 89.99 449.99
Data Y:
94 85.5 86 94 109 118 72 140 102.8 99.8 80 106 122 161 135 140 140 135 109 135 135 90 90 81 104 104 135 81 126 140 120 120 110 108 120 118 85 94 72.6 78 65 130 70 78.5 93.5 80 78.8 90.3 87.7 107 90 103 126 98 128 132 94 111 95 155
Name of dataseries x
Source of x
Description of x
Name of dataseries y
Source of y
Description of y
Chart options
Label y-axis:
Label x-axis:
R Code
bitmap(file='test1.png') op <- par(mfrow=c(2,2)) plot(x,type='b',main='Plot of x',xlab=xlab,ylab=ylab) plot(y,type='b',main='Plot of y',xlab=xlab,ylab=ylab) hist(x) hist(y) dev.off() load(file='createtable') a<-table.start() a<-table.row.start(a) a<-table.element(a,'Bivariate Dataseries',2,TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Name of dataseries x',header=TRUE) a<-table.element(a,par1) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Source of x',header=TRUE) a<-table.element(a,par2) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Description of x',header=TRUE) a<-table.element(a,par3) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Name of dataseries y',header=TRUE) a<-table.element(a,par4) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Source of y',header=TRUE) a<-table.element(a,par5) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Description of y',header=TRUE) a<-table.element(a,par6) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Number of observations',header=TRUE) a<-table.element(a,length(x)) a<-table.row.end(a) a<-table.end(a) table.save(a,file='mytable.tab')
Compute
Summary of computational transaction
Raw Input
view raw input (R code)
Raw Output
view raw output of R engine
Computing time
0 seconds
R Server
Big Analytics Cloud Computing Center
Click here to blog (archive) this computation