Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
0.5204858765 0.4299970622 0.1055749243 0.8839177281 -0.2776217713 -0.04603036369 1.530298233 1.494731706 -0.02891792556 0.6210498591 -0.6833539359 -0.3082249829 2.280133308 -0.8854543504 -0.04417164204 -0.2627590147 -0.6464459948 -1.408271427 -0.2068236471 -0.2444683685 -0.5751587313 1.097042084 0.1405691781 -0.3300974353 0.1428316656 0.5221842551 0.4357357906 -0.3140161459 0.5044406113 -0.8869340522 -0.5515685025 0.3221753874 -0.1657235598 0.5236439193 0.5334899411 -0.01308235838 -0.188870343 -1.583371452 -0.06925025675 -0.8971631937 -0.4586626014 0.6110670481 2.111856211 0.7777655572 -0.3209775348 -0.2231985481 1.173938281 0.02263852571 0.5932077408 1.675801559 -0.719839903 0.5162627183 -0.4181946087 -0.04962701844 -0.8528521942 0.9169631383 2.132480975 -0.5417598275 1.579291362 -1.278896837 1.230393048 1.154504413 -0.9500787618 -0.3315198443 -0.287192948 0.5204767549 -2.670639646 -0.3054041115 0.6705847742 0.5393860559 0.1598504595 1.429802307 -0.1034513415 -0.7810377769 -1.022645695 0.2453215126 -1.619279166 -0.3391061191 0.6802321487 0.8461418237 -0.1475624525 0.6771614217 -0.5552064271 -1.589212028 0.3693384673 0.9532453187 0.5877242327 1.277966617 -0.0467692114 0.7582087478 -1.524612327 -0.8199127865 -0.7271715052 1.201655844 -0.519997947 0.02365677181 -0.6266331882 0.03756465409 -0.01730812214 -0.7834487515 0.4530912767 -1.985004931 -1.57658523 0.5421603989 0.6866220024 -0.2243281006 -0.6022367528 -1.419591408 1.095193078 1.298443003 1.800641426 -1.324349799 1.463766685 -0.1093880669 1.016816844 -0.5485597733 0.3050223862 0.7261463821 0.1583472137 -0.1278204388 -2.129778564 -1.069239212 0.3488821306 -0.148364031 -1.793054034 0.2138747947 1.054839856 0.4083389505 2.263713378 1.047445731 0.4634591175 0.3678508639 -0.9585346633 0.3916771173 -0.09227420385 -0.3880879866 -0.20806761 1.967601235 -1.661825274 -0.125538702 2.262872815 1.076537534 -0.1584336002 0.08453179444 -1.00981273 0.9664253567 1.206438862 1.256021171 -1.363092143 1.745031988
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
1 seconds
R Server
Big Analytics Cloud Computing Center
Click here to blog (archive) this computation