FreeStatistics.org

Free Statistics

of Irreproducible Research!

Description of Statistical Computation

Author's title

Author*Unverified author*
R Software Modulerwasp_histogram.wasp
Title produced by softwareHistogram
Date of computationThu, 13 Dec 2007 07:26:48 -0700
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2007/Dec/13/t11975550893613v43bg0wx6ag.htm/, Retrieved Sun, 05 May 2024 15:30:46 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=3563, Retrieved Sun, 05 May 2024 15:30:46 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact218

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Central Tendency] [Paper_EDA_output1] [2007-12-13 08:57:44] [e44956fac49704be9081ff9a6fb8481a]
- RMPD    [Histogram] [Paper_EDAres_outp...] [2007-12-13 14:26:48] [d41d8cd98f00b204e9800998ecf8427e] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
0.000249254412317267 
0.000299603588409276 
0.000322518965091164 
-0.000329538636649367 
-6.43325994869136e-05 
0.000218734547908577 
-0.000186123790106601 
0.000320044464404368 
0.000105079817925291 
-3.21375723064676e-05 
-9.31379372201002e-05 
0.000863880329915967 
-0.000955068293604838 
0.000191654585176615 
-0.000687217159304088 
-0.00133295077536133 
-8.40818637339591e-05 
0.000480643586810492 
-0.00133724173345948 
-0.00078463864413933 
-9.63012198662017e-05 
-0.000267289029594886 
-0.000415973064666258 
-0.00145962546732839 
0.00114159591731011 
-0.00146064163655782 
-0.00105351430012057 
0.000585759739068242 
-0.00113140931418457 
-0.00138720915811827 
0.000330704048772557 
0.00089730707501226 
-0.00282718491905784 
0.00130177229774819 
0.000106725469179531 
0.00194958872561832 
0.000635002216373137 
-0.000802593879913022 
0.000669740048378942 
-0.00184856803744929 
-0.00115402862422859 
0.000720565693177494 
0.00127635646932789 
0.000280808847524822 
-0.00124166740902709 
0.00220850912079990 
0.00014951799778537 
0.000246824748826507 
-0.000329567131906322 
-0.000100055638308394 
-0.000843374093922739 
-0.00182816513524967 
0.000762276721414934 
0.000547214397100731 
-0.000261835368196878 
-0.000145977686326793 
-0.000418138010040314 
-0.000275994456749945 
0.00096506287877901 
-0.000122679144738069 
-0.00077104475183501 
-0.000772836964526374 
-9.74711304966847e-05 
0.00132936498148101 
0.000993746723184863 
-0.000451847013386047 
-0.000138456169144319 
-0.00109488862631829 
-0.000236567991803771 
0.000228265967558205 
-0.000141243730919727 
7.13248149721013e-05 
0.000100146168015486 
-0.000101542587067266 
-0.00103071143157252 
-0.000910687763439777 
-0.00169775499641645 
0.000648520060953617 
-0.00081739205188841 
-0.000440416182630077 
-0.000143836644462325 
-0.00086105174113707 
0.00118491489582653 
0.00092521493356959 
0.000685499195885314 
-0.00170870319900812 
-0.000681671133016343 
-0.00207056008076914 
0.000710534206097013 
-0.00163014844752510 
-0.00123315260753790 
-0.000307767159812872 
-0.000896177657593727 
0.000651475976366861 
0.00196454841594412 
0.000447156493560086

Tables (Output of Computation)





Summary of compuational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'Herman Ole Andreas Wold' @ 193.190.124.10:1001

\begin{tabular}{lllllllll}
\hline
Summary of compuational transaction \tabularnewline
Raw Input & view raw input (R code)  \tabularnewline
Raw Output & view raw output of R engine  \tabularnewline
Computing time & 2 seconds \tabularnewline
R Server & 'Herman Ole Andreas Wold' @ 193.190.124.10:1001 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=3563&T=0

[TABLE]
[ROW][C]Summary of compuational transaction[/C][/ROW]
[ROW][C]Raw Input[/C][C]view raw input (R code) [/C][/ROW]
[ROW][C]Raw Output[/C][C]view raw output of R engine [/C][/ROW]
[ROW][C]Computing time[/C][C]2 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Herman Ole Andreas Wold' @ 193.190.124.10:1001[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=3563&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=3563&T=0

As an alternative you can also use a QR Code:  
QR Code


The GUIDs for individual cells are displayed in the table below:

Summary of compuational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'Herman Ole Andreas Wold' @ 193.190.124.10:1001






Frequency Table (Histogram)
BinsMidpointAbs. FrequencyRel. FrequencyCumul. Rel. Freq.Density
[-0.003,-0.0025[-0.0027510.0104170.01041720.833329
[-0.0025,-0.002[-0.0022510.0104170.02083320.833333
[-0.002,-0.0015[-0.0017550.0520830.072917104.166667
[-0.0015,-0.001[-0.00125120.1250.197917250
[-0.001,-5e-04[-0.00075120.1250.322917250
[-5e-04,0[-0.00025250.2604170.583333520.833333
[0,5e-04[0.00025170.1770830.760417354.166667
[5e-04,0.001[0.00075150.156250.916667312.5
[0.001,0.0015[0.0012550.0520830.96875104.166667
[0.0015,0.002[0.0017520.0208330.98958341.666667
[0.002,0.0025[0.0022510.010417120.833333

\begin{tabular}{lllllllll}
\hline
Frequency Table (Histogram) \tabularnewline
Bins & Midpoint & Abs. Frequency & Rel. Frequency & Cumul. Rel. Freq. & Density \tabularnewline
[-0.003,-0.0025[ & -0.00275 & 1 & 0.010417 & 0.010417 & 20.833329 \tabularnewline
[-0.0025,-0.002[ & -0.00225 & 1 & 0.010417 & 0.020833 & 20.833333 \tabularnewline
[-0.002,-0.0015[ & -0.00175 & 5 & 0.052083 & 0.072917 & 104.166667 \tabularnewline
[-0.0015,-0.001[ & -0.00125 & 12 & 0.125 & 0.197917 & 250 \tabularnewline
[-0.001,-5e-04[ & -0.00075 & 12 & 0.125 & 0.322917 & 250 \tabularnewline
[-5e-04,0[ & -0.00025 & 25 & 0.260417 & 0.583333 & 520.833333 \tabularnewline
[0,5e-04[ & 0.00025 & 17 & 0.177083 & 0.760417 & 354.166667 \tabularnewline
[5e-04,0.001[ & 0.00075 & 15 & 0.15625 & 0.916667 & 312.5 \tabularnewline
[0.001,0.0015[ & 0.00125 & 5 & 0.052083 & 0.96875 & 104.166667 \tabularnewline
[0.0015,0.002[ & 0.00175 & 2 & 0.020833 & 0.989583 & 41.666667 \tabularnewline
[0.002,0.0025[ & 0.00225 & 1 & 0.010417 & 1 & 20.833333 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=3563&T=1

[TABLE]
[ROW][C]Frequency Table (Histogram)[/C][/ROW]
[ROW][C]Bins[/C][C]Midpoint[/C][C]Abs. Frequency[/C][C]Rel. Frequency[/C][C]Cumul. Rel. Freq.[/C][C]Density[/C][/ROW]
[ROW][C][-0.003,-0.0025[[/C][C]-0.00275[/C][C]1[/C][C]0.010417[/C][C]0.010417[/C][C]20.833329[/C][/ROW]
[ROW][C][-0.0025,-0.002[[/C][C]-0.00225[/C][C]1[/C][C]0.010417[/C][C]0.020833[/C][C]20.833333[/C][/ROW]
[ROW][C][-0.002,-0.0015[[/C][C]-0.00175[/C][C]5[/C][C]0.052083[/C][C]0.072917[/C][C]104.166667[/C][/ROW]
[ROW][C][-0.0015,-0.001[[/C][C]-0.00125[/C][C]12[/C][C]0.125[/C][C]0.197917[/C][C]250[/C][/ROW]
[ROW][C][-0.001,-5e-04[[/C][C]-0.00075[/C][C]12[/C][C]0.125[/C][C]0.322917[/C][C]250[/C][/ROW]
[ROW][C][-5e-04,0[[/C][C]-0.00025[/C][C]25[/C][C]0.260417[/C][C]0.583333[/C][C]520.833333[/C][/ROW]
[ROW][C][0,5e-04[[/C][C]0.00025[/C][C]17[/C][C]0.177083[/C][C]0.760417[/C][C]354.166667[/C][/ROW]
[ROW][C][5e-04,0.001[[/C][C]0.00075[/C][C]15[/C][C]0.15625[/C][C]0.916667[/C][C]312.5[/C][/ROW]
[ROW][C][0.001,0.0015[[/C][C]0.00125[/C][C]5[/C][C]0.052083[/C][C]0.96875[/C][C]104.166667[/C][/ROW]
[ROW][C][0.0015,0.002[[/C][C]0.00175[/C][C]2[/C][C]0.020833[/C][C]0.989583[/C][C]41.666667[/C][/ROW]
[ROW][C][0.002,0.0025[[/C][C]0.00225[/C][C]1[/C][C]0.010417[/C][C]1[/C][C]20.833333[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=3563&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=3563&T=1

As an alternative you can also use a QR Code:  
QR Code


The GUIDs for individual cells are displayed in the table below:

Frequency Table (Histogram)
BinsMidpointAbs. FrequencyRel. FrequencyCumul. Rel. Freq.Density
[-0.003,-0.0025[-0.0027510.0104170.01041720.833329
[-0.0025,-0.002[-0.0022510.0104170.02083320.833333
[-0.002,-0.0015[-0.0017550.0520830.072917104.166667
[-0.0015,-0.001[-0.00125120.1250.197917250
[-0.001,-5e-04[-0.00075120.1250.322917250
[-5e-04,0[-0.00025250.2604170.583333520.833333
[0,5e-04[0.00025170.1770830.760417354.166667
[5e-04,0.001[0.00075150.156250.916667312.5
[0.001,0.0015[0.0012550.0520830.96875104.166667
[0.0015,0.002[0.0017520.0208330.98958341.666667
[0.002,0.0025[0.0022510.010417120.833333


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = -0.4 ; par2 = 1 ; par3 = 1 ; par4 = 12 ;
Parameters (R input):
par1 = ; par2 = grey ;
R code (references can be found in the software module):
par1 <- as.numeric(par1)
bitmap(file='test1.png')
if (is.na(par1)) {
myhist<-hist(x,col=par2)
} else {
if (par1 < 0) par1 <- 3
if (par1 > 50) par1 <- 50
myhist<-hist(x,breaks=par1,col=par2)
}
dev.off()
myhist
n <- length(x)
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,hyperlink('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
for (i in 1:(length(myhist$breaks)-1)) {
a<-table.row.start(a)
dum <- paste('[',myhist$breaks[i],sep='')
dum <- paste(dum,myhist$breaks[i+1],sep=',')
dum <- paste(dum,'[',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')