Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
-20.2709054693811 13.099061185656 16.9335347772804 29.0528022979499 7.38820069498436 -29.5579220471488 -10.1072501563793 -0.152685277280995 -4.63682018394169 -26.7451626861207 -26.3664036644236 -23.7263688810099 -29.8026955707136 -6.2103351910481 -7.45346787479525 6.32431133421221 36.2182214195845 -4.15831557890209 48.1619420555141 27.4568565571639 3.81307127305456 32.3652568508687 -13.695456047441 0.97126578235617 28.921626139036 44.0917816357488 29.3264440690489 16.9266856701619 10.7430581476398 -17.8149965758874 -3.1762566665119 -25.4760790055699 -3.81460113038702 -16.5390041440843 6.82369436609457 22.0471789340961 -14.5456979710198 -26.4431998412664 -16.5761947749258 -10.56187802827 -1.2314304052494 -34.3455108424754 -14.1627966467986 -7.16529477653486 20.3935073079699 24.6081411075147 28.1098764309357 8.19722256077625 -16.6317927825005 -15.8886322165168 -24.9809647139458 -0.0236209593056742 17.7498536716993 -27.8076294282984 2.43168210460689 19.3204217082976 19.8704615262295 13.5311094314512 5.87885886054912 2.47915020921315 -7.83691991524017 -30.811526703561 -18.4216265552946 14.3138791332485 12.2655156981566 -47.297438552061 -33.1635981693756 -35.2509910252572 -20.8770836668977 -27.8773523556143 -23.1905195204548 -8.87481040621282 19.9245372349118 37.0115920518963 49.4631538054682 59.2627556852162 50.978488441329 -22.4425976560265 -2.86688912047919 11.175673701868 28.3795367384563 0.425431908522626 3.95842860246518 -0.59489764540632 0.935414633604864 -9.63816180253048 -5.24723130207843 28.0306828375036 9.22472785345053 -37.6788163349869 -32.4855658905216 -9.77669919251173 -8.3065322802608 3.68365775668389 8.76094931750475 12.6795480067219 -13.9182147771784 -20.6353499582819 2.51202179720195 4.34118050159435 35.1864700823514 1.25552598858462 5.32137652772064 -13.9388609745915 -14.9377982626625 -15.6073653433434 15.2101690998517 20.4543466175311 3.68216266209305 -17.6808173004925 -21.0792903264907 -3.00272537180729 16.9899704592409 -12.2492128493627 -24.3916015250635 -38.2721164195545 -36.7913310998044 -43.6359683026841 -17.9935039816878 -19.5283807502867 1.12038100799691 39.9251486795142 49.5944232876187 69.8198141935435 57.5613359758332 22.1695891824235 30.6746370219168 18.2882112206891 -13.9369143662975 -18.2928367928593 -25.8616576955449 12.6004798864657 13.2462559953589 16.2652960058122 9.44884295285294 -18.3011186066836 -13.5349492898555 -35.7922295810592 -25.3527152393601 -16.5313537597499 -11.1486920658987 8.68204031415814 27.8998742180912 13.0389596374505 -1.03831641630757 -34.8015338446592 14.6997556635764 -3.58926916477731 -7.2621631167662 -6.58703494926408 -18.4151121488591 -14.8681026131873 -47.6597928632744 -21.293904703775 -11.6409150203995 26.1899365185078 29.7044265842977 45.4646645514389 38.3894094551673 23.0981672860589 21.4230559933152 18.2417705684547 11.157279776497 -0.715531051159587 -15.1270416645751 -7.22130840920806 -11.9284736299649 4.3668514752772 -1.85418489259808 -18.396933394698 -4.57517496021046 -6.36700775201803 28.3572903325393 -15.1385061458589 -28.8375079913542 3.69140933823331 -17.8183731179381 -25.4540690887963 0.697336464221678 0.513021945883395 13.1123459544277 27.375749706785 6.70366039572968 1.72995278986326 18.8723760603616 8.45675736115044 -8.36206670515787 -13.1309014264256 -21.9384359334522 -11.316210111774 15.7931172337804 9.19304281295445 12.0766069190111 -0.158542529553074 1.87081495847008 5.56132937684214 -0.0320253284210139 24.3951859793569 -25.9808080799622 -2.75573658894825 -10.0693648836933 3.01810007287617 -3.00733344667827 7.28490386261939 -8.83922030120033 8.43332454445152 -12.5296236733093 10.5849465226221 8.21564759491815 25.7833624702596 -8.25212802149616 3.96194568339797 -3.76268039746691 5.60193272405382 8.65364736945077 1.61018538247964 -20.3496380776089 -39.7826145245488 -25.4510840349012 -9.77951072936571 19.8081934525346 28.3641637082268 -1.68307140317813 7.85290337413733 -5.54982163430628 8.42796042368923 0.0928440055608917 7.89581561993737 -14.0175742388036 -21.8600192005484 -23.037957225706 -15.1679115432987 -17.2817349845265 25.3301124410899 8.53875449960913 9.13744833432287 21.6974423832777 45.2415933588997 20.6728458583979 3.13644765577152 -31.2163120199723 -16.3833863471703 -26.4859537377811 -28.4965981176658 -23.7911116211856 36.696833525137 21.7815733043625 10.685830460587 13.5513878310525 22.27837801177 9.7924697163636 -5.80466174159562 -30.4181546726723 -34.8358531079964 -29.4890446067332 -12.9710399682596 -18.5369044534211 14.1079604702348 12.4496200267936 7.09166280966235 27.6950058067722 24.8204626418524 -16.7669789991913 -35.666284563673 -38.881951601272 -20.1755054827821 -14.2045524277049 -6.65080261426306 -16.1809219244564 24.2566315261574 15.7909796096739 4.42774397800889 15.2258085605849 18.172916637119 21.7071262375293 16.228155289703 15.1328228687593 4.221479788034 -4.02535635610417 -15.2689128995269 -26.7963385665849 9.45679179427765 15.6067167880431 20.0086736859531 15.1719307981042 4.98222085991449 8.779612445601 -3.12079604344592 1.6624339943898 -8.77900771300335 -3.25594248380924 -13.0611815411808 -24.7502897221875 15.28708151674 17.3212473885702 22.7823530321417 25.9047588899543 29.2833536574919 -6.4509500510942 -16.8458040939865 -26.8570196099963 -13.3300687467932 -17.9386109470027 -8.81107910829854 -21.7674163932296 11.0939195225194 4.9520500711713 0.829786515983244 12.5688231750361 -13.5626083263094 -7.70693830377883 -12.5940635381495 6.8024497543625 4.75206969542046 -16.8338034269343 -33.1144921099329 -38.0790499165669 -4.39061960073718 -10.8053946520047 -42.5701834010817 -19.1736719359176 -48.9071564856791 -36.2535395115642 -24.4263000557075 82.1845779270318 62.3146814178742 66.7092918453038 36.7672342436149 22.6413075182908 39.5702183038967 21.3959237224055 4.89182620853535 8.24902890890621 4.31995604367148 -10.6220152976869 -7.70793075700465 26.1897923105604 8.75615568618377 -13.2129740016054 -33.8277047092123 -67.9263045404545 -3.50643896828501 13.5102212367874 19.6265424537694 7.60416388499254 5.25851506654385 10.8999677719715 5.56674975050043 19.6171702559119 42.4005548988072 15.9484464782897 -36.6024109254785 -50.4371374528818 15.7757585931204 -3.91455072797442 17.9588622881995 12.1935755186144 14.9393101500264 14.2721463053147 -26.0102537907259 11.4909846401163 -6.15575459403772 -1.83798689160437 -37.2946314110783 -35.1351450541873 -16.5044373853491 21.923064916392 6.30580716075735 13.9498496193636 -0.724386281069428 -2.31152065762626 8.28910924278432
Sample Range:
(leave blank to include all observations)
From:
To:
Number of bins
(leave empty to use default)
(?)
Colour
grey
grey
white
blue
red
black
brown
yellow
Bins are closed on right side
FALSE
FALSE
TRUE
Scale of data
Unknown
Unknown
Interval/Ratio
3-point Likert
4-point Likert
5-point Likert
6-point Likert
7-point Likert
8-point Likert
9-point Likert
10-point Likert
11-point Likert
Chart options
Title:
Label x-axis:
R Code
par1 <- as.numeric(par1) if (par3 == 'TRUE') par3 <- TRUE if (par3 == 'FALSE') par3 <- FALSE if (par4 == 'Unknown') par1 <- as.numeric(par1) if (par4 == 'Interval/Ratio') par1 <- as.numeric(par1) if (par4 == '3-point Likert') par1 <- c(1:3 - 0.5, 3.5) if (par4 == '4-point Likert') par1 <- c(1:4 - 0.5, 4.5) if (par4 == '5-point Likert') par1 <- c(1:5 - 0.5, 5.5) if (par4 == '6-point Likert') par1 <- c(1:6 - 0.5, 6.5) if (par4 == '7-point Likert') par1 <- c(1:7 - 0.5, 7.5) if (par4 == '8-point Likert') par1 <- c(1:8 - 0.5, 8.5) if (par4 == '9-point Likert') par1 <- c(1:9 - 0.5, 9.5) if (par4 == '10-point Likert') par1 <- c(1:10 - 0.5, 10.5) bitmap(file='test1.png') if(is.numeric(x[1])) { if (is.na(par1)) { myhist<-hist(x,col=par2,main=main,xlab=xlab,right=par3) } else { if (par1 < 0) par1 <- 3 if (par1 > 50) par1 <- 50 myhist<-hist(x,breaks=par1,col=par2,main=main,xlab=xlab,right=par3) } } else { plot(mytab <- table(x),col=par2,main='Frequency Plot',xlab=xlab,ylab='Absolute Frequency') } dev.off() if(is.numeric(x[1])) { myhist n <- length(x) load(file='createtable') a<-table.start() a<-table.row.start(a) a<-table.element(a,hyperlink('http://www.xycoon.com/histogram.htm','Frequency Table (Histogram)',''),6,TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Bins',header=TRUE) a<-table.element(a,'Midpoint',header=TRUE) a<-table.element(a,'Abs. Frequency',header=TRUE) a<-table.element(a,'Rel. Frequency',header=TRUE) a<-table.element(a,'Cumul. Rel. Freq.',header=TRUE) a<-table.element(a,'Density',header=TRUE) a<-table.row.end(a) crf <- 0 if (par3 == FALSE) mybracket <- '[' else mybracket <- ']' mynumrows <- (length(myhist$breaks)-1) for (i in 1:mynumrows) { a<-table.row.start(a) if (i == 1) dum <- paste('[',myhist$breaks[i],sep='') else dum <- paste(mybracket,myhist$breaks[i],sep='') dum <- paste(dum,myhist$breaks[i+1],sep=',') if (i==mynumrows) dum <- paste(dum,']',sep='') else dum <- paste(dum,mybracket,sep='') a<-table.element(a,dum,header=TRUE) a<-table.element(a,myhist$mids[i]) a<-table.element(a,myhist$counts[i]) rf <- myhist$counts[i]/n crf <- crf + rf a<-table.element(a,round(rf,6)) a<-table.element(a,round(crf,6)) a<-table.element(a,round(myhist$density[i],6)) a<-table.row.end(a) } a<-table.end(a) table.save(a,file='mytable.tab') } else { mytab reltab <- mytab / sum(mytab) n <- length(mytab) load(file='createtable') a<-table.start() a<-table.row.start(a) a<-table.element(a,'Frequency Table (Categorical Data)',3,TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Category',header=TRUE) a<-table.element(a,'Abs. Frequency',header=TRUE) a<-table.element(a,'Rel. Frequency',header=TRUE) a<-table.row.end(a) for (i in 1:n) { a<-table.row.start(a) a<-table.element(a,labels(mytab)$x[i],header=TRUE) a<-table.element(a,mytab[i]) a<-table.element(a,round(reltab[i],4)) a<-table.row.end(a) } a<-table.end(a) table.save(a,file='mytable1.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