Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
1.295608211 -0.7552179446 -0.105150922 0.457037213 -1.796834752 -0.06555388418 -2.215531922 -0.3954759922 -1.215073597 -0.9035856889 -1.008772491 -1.216108102 1.23722838 -0.6904325617 1.174619304 1.105917827 -1.576772704 0.4287674838 -0.8834176461 0.4188465894 -2.141627312 -0.2929503964 -0.8945862623 0.07902062042 -0.007244249416 -0.2853103315 -1.383445219 0.51838496 -0.2096668426 -0.9448533133 0.2902523083 -1.391133081 -0.394974256 -0.1221197144 0.2060945364 -0.1763687352 0.3536920879 2.188042669 0.4544224707 -1.804790284 0.9859772148 -1.04695358 0.004615940613 2.070506394 -0.7489641373 -0.9939931857 0.870254653 0.6626770604 0.761131824 0.7460591727 0.5711544003 -0.600115585 -0.647889241 0.6355509877 -1.107721786 1.070927881 -0.259250541 -0.5058902497 0.9395224196 0.7677484633 0.4789792517 -1.410414941 0.4923780102 1.624808669 -0.7950155745 -0.474134081 0.6534662048 0.3553472532 1.191176376 -0.07242646639 -0.205049646 -1.415490565 2.189041683 -0.07837186316 0.8018214202 -0.02064864457 1.570866106 -0.5843082944 -1.387940479 -0.8242797558 -0.2316669759 0.1734854894 -0.9463301625 -0.4979907968 1.007997328 -0.3130179078 0.9785938261 -0.5002129172 0.3436335893 0.845472789 -1.306504595 -0.7586965424 -1.014539807 2.401510289 -0.3125780313 -0.5561315474 -0.07376232428 0.2337258104 -0.3436593856 0.3811075064 -2.135757554 0.4065216144 -0.1754508473 -0.4089085984 0.4231153884 -0.9733617295 -1.437037446 -0.6186587971 0.6685855959 0.8965971567 0.3042735504 0.1307079257 0.9220687876 -0.03498222039 -0.2450105909 -0.6118723963 -1.128858825 1.573810092 1.404342409 -0.231748957 0.9768879763 0.5022420312 -0.6699234821 0.6439489156 0.1781270125 -1.192118135 -0.6988918012 0.6356913003 -3.107492545 1.464415364 1.177062736 -1.102197079 1.314483419 -0.203661524 1.6046852 0.2015927878 0.01016253925 -0.2894753897 1.011126595 -2.184640896 -0.190970333 1.724666844 0.8941052486 -0.818730608 -0.007454617025 -0.2074043742 1.408942641 -0.6108850016 0.7796198347 0.926470912
Sample Range:
(leave blank to include all observations)
From:
To:
Color code
(?)
Number of bins
(?)
Chart options
Title:
Label y-axis:
Label x-axis:
R Code
library(MASS) library(car) par1 <- as.numeric(par1) if (par2 == '0') par2 = 'Sturges' else par2 <- as.numeric(par2) x <- as.ts(x) #otherwise the fitdistr function does not work properly r <- fitdistr(x,'normal') print(r) bitmap(file='test1.png') myhist<-hist(x,col=par1,breaks=par2,main=main,ylab=ylab,xlab=xlab,freq=F) curve(1/(r$estimate[2]*sqrt(2*pi))*exp(-1/2*((x-r$estimate[1])/r$estimate[2])^2),min(x),max(x),add=T) dev.off() bitmap(file='test3.png') qqPlot(x,dist='norm',main='QQ plot (Normal) with confidence intervals') grid() dev.off() load(file='createtable') a<-table.start() a<-table.row.start(a) a<-table.element(a,'Parameter',1,TRUE) a<-table.element(a,'Estimated Value',1,TRUE) a<-table.element(a,'Standard Deviation',1,TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'mean',header=TRUE) a<-table.element(a,r$estimate[1]) a<-table.element(a,r$sd[1]) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'standard deviation',header=TRUE) a<-table.element(a,r$estimate[2]) a<-table.element(a,r$sd[2]) 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