Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
0.3669972319 0.4826126414 -0.5180877459 -1.014150855 0.1773863514 0.5603136717 -1.304140974 0.3429982273 0.5963339635 1.908386796 0.301105226 -0.3856240026 0.3072786769 -0.879196829 -1.171287315 0.3462065309 1.634004504 -0.8715566733 -0.1538540532 -0.1452101606 1.469474211 0.3271489905 1.409542788 -0.8720092004 -0.2484629525 -0.2473505 0.06285981059 1.77360377 0.4855119254 -1.697636129 -0.6161072708 0.01459159573 1.313645344 0.00407742289 0.07717208428 -0.2688000354 1.631444437 -0.6685065257 -0.3862665266 0.5499466808 -1.749115188 0.5666602711 -0.5822364638 1.979485754 0.6104939438 -1.790727327 1.600119846 -0.4066528587 -1.467691222 0.432848857 -0.7612729824 0.2595501684 -0.4742910795 -0.4122178406 -0.7941532792 0.417093737 -1.361875264 -2.248732263 -0.4577763724 -0.6006801633 0.8526200591 1.324104426 0.3781055042 -1.195846749 1.032350602 -0.3256286377 -1.598860973 -0.0887844366 -0.5881034384 -0.1720201239 -0.128859975 -0.8541855798 0.6354710098 1.206100306 0.1817394072 0.5898081205 -0.6579975194 -0.5905365498 0.968903123 -0.4606555651 0.2970934387 -0.9504623767 0.7663281504 0.1094751696 2.07185291 -0.3734195623 0.2077126573 0.8856452565 0.268604673 -0.5454347753 -0.2240982478 0.6220570075 -0.7065297948 -0.3670168702 1.098907843 0.9869095056 -1.324173272 -0.9344801488 0.7928062113 0.3545127736 0.9346402928 0.5256069633 -0.1484944595 0.6442771383 -1.008326443 -0.2311506413 -0.4166066869 -0.7934227762 0.1315688919 1.692326441 0.09485651992 -2.244508532 0.5088066966 -1.459230743 -1.679323176 0.348416267 1.201537912 1.159611961 -1.398698429 1.412555334 0.8122922242 0.2949187427 0.8069887017 0.818283799 -0.3844387259 1.940185471 1.0088279 0.9993876763 -0.7477436676 -0.2699832391 -1.303364549 0.1201777454 0.9710416331 0.3806772048 1.543725286 0.289479347 0.4165421071 0.1775186785 -0.2814457531 0.8214961204 -0.03557347201 1.509281636 -1.256757507 1.543549697 -1.396634528 -0.550727773 0.8989692606 0.1506936664 0.3638643325 0.3834138005
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