Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
0.2584634943 0.201778884 -0.1114837743 1.574234402 0.1307858056 0.06782176775 0.1594572108 1.653268072 -0.7463624187 0.9113128982 -0.08412561623 -1.122332518 -0.09941332042 -0.413051254 0.4805331088 1.143712692 1.279442018 -0.8512875792 0.9989288187 0.3085059189 0.3678251987 0.05653833746 -1.357954173 0.01382398298 -1.016883307 1.117352598 0.04349105683 1.24434587 0.08677714073 1.160487822 -0.02899699261 -0.3797446223 0.3230436406 -0.5525267218 -1.767664846 0.4242185424 0.792000946 -1.183800179 1.815515138 0.3627360942 0.05702796634 -0.44053995 1.263478394 0.0618711823 -1.613381171 -0.9621366742 -0.7169231208 0.2973518916 -0.7694206608 2.027125796 0.5884630444 0.9590486117 -0.06940184013 -0.2002647966 -1.02115166 -0.2501731913 0.6651931253 0.9409915232 1.650637294 -0.3812256945 2.629032558 -1.100578718 0.7439361526 -1.07119593 -1.553368389 -0.7284318463 0.123436694 -1.641368458 -0.1795766052 -1.178842396 0.3936749863 -1.460872563 1.413205333 -0.7673627781 0.1486652327 -0.575955044 0.9649606647 -1.400908293 -0.5440914368 -1.604877365 -1.355945598 -0.3554673478 0.5747768047 -1.898438473 0.6328046939 0.6805639044 -1.090728845 1.033878244 0.9474294013 -0.7025785623 -1.804843821 1.832132011 -2.507633001 -0.2106114923 1.921468513 1.328527422 -0.6510269116 0.3145855101 0.9864005184 -1.675608041 -0.7014082899 -1.210864922 -0.4124405638 0.1015285864 -1.419998608 -0.4842976128 -0.6533994793 -0.3320567754 0.8812368046 1.546409751 0.6682366864 0.7379472145 -2.434215334 1.780126939 -0.6663783872 -1.553365003 -0.8668446349 -0.2058638531 0.3281086781 -0.2012633271 0.9138290184 -1.589827816 0.903385198 -0.1481546771 -1.001423113 0.9948373073 -0.1260195186 -1.365980236 0.40215755 0.4943910853 3.148150056 -0.2042380108 1.461388269 -1.796083948 -0.5068652931 -1.003630222 0.4675914269 -0.7291428615 1.53479353 -1.975335908 0.533415463 0.9329370934 -0.008386507354 -0.3459081512 -0.3059685217 -0.5095537733 -0.856907367 0.232203098 0.2427043775 -1.987092319
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