Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
88 98 89 81 88 95 79 91 80 91 85 94 86 82 107 97 78 91 74 95 97 112 80 98 102 100 97 92 114 88 96 91 114 91 114 89 103 83 74 88 88 98 74 86 93 85 91 75 97 88 79 106 102 98 98 114 95 98 82 97 94 84 88 83 98 106 94 91 89 102 103 96 89 112 74 74 102 106 91 94 98 85 108 90 74 81 104 90 95 85 114 114 93 104 92 100 92 77 86 87 91 102 100 113
Number of Bins
(?)
Chart options
R Code
par1 <- '10' bitmap(file='test1.png') par1 <- as.numeric(par1) myhist<-hist(x, breaks=par1, col=2) dev.off() bitmap(file='test2.png') qqnorm(x) qqline(x, col=2) dev.off() load(file='createtable') a<-table.start() a<-table.row.start(a) a<-table.element(a,'Descriptive Statistics',3,TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'mean',header=TRUE) a<-table.element(a,mean(x)) a<-table.element(a,hyperlink('http://www.xycoon.com/arithmetic_mean.htm','formula','click to see the formula')) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'standard deviation',header=TRUE) a<-table.element(a,sd(x)) a<-table.element(a,hyperlink('http://www.xycoon.com/unbiased1.htm','formula','click to see the formula')) 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