Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_histogram.wasp
Title produced by softwareHistogram
Date of computationTue, 14 Feb 2012 15:36:17 -0500
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2012/Feb/14/t1329251792zxxbllgjv550l9h.htm/, Retrieved Mon, 29 Apr 2024 10:38:02 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=162354, Retrieved Mon, 29 Apr 2024 10:38:02 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact114
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Histogram] [Prijs van naaigar...] [2012-02-08 21:20:13] [62176cae2247e1f97e645adfc0a7b796]
- R PD  [Histogram] [Histogram consump...] [2012-02-12 20:59:45] [62176cae2247e1f97e645adfc0a7b796]
-   P     [Histogram] [Histogram consump...] [2012-02-14 20:27:59] [62176cae2247e1f97e645adfc0a7b796]
-             [Histogram] [Histogram consump...] [2012-02-14 20:36:17] [1c41dd1c3cda3fb9bab7d6fdffb4cffd] [Current]
Feedback Forum

Post a new message
Dataseries X:
2.35
2.35
2.35
2.35
2.35
2.35
2.35
2.36
2.36
2.36
2.36
2.36
2.36
2.37
2.37
2.39
2.4
2.41
2.41
2.42
2.44
2.44
2.44
2.44
2.44
2.45
2.45
2.46
2.47
2.48
2.48
2.48
2.49
2.5
2.5
2.5
2.5
2.5
2.5
2.5
2.51
2.52
2.54
2.56
2.57
2.57
2.58
2.59
2.6
2.6
2.62
2.63
2.62
2.63
2.63
2.63
2.63
2.63
2.63
2.64




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'AstonUniversity' @ aston.wessa.net

\begin{tabular}{lllllllll}
\hline
Summary of computational 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 & 'AstonUniversity' @ aston.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=162354&T=0

[TABLE]
[ROW][C]Summary of computational 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]'AstonUniversity' @ aston.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=162354&T=0

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

As an alternative you can also use a QR Code:  

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

Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'AstonUniversity' @ aston.wessa.net







Frequency Table (Histogram)
BinsMidpointAbs. FrequencyRel. FrequencyCumul. Rel. Freq.Density
[2.35,2.355[2.352570.1166670.11666723.333333
[2.355,2.36[2.3575000.1166670
[2.36,2.365[2.362560.10.21666720
[2.365,2.37[2.3675000.2166670
[2.37,2.375[2.372520.0333330.256.666667
[2.375,2.38[2.3775000.250
[2.38,2.385[2.3825000.250
[2.385,2.39[2.3875000.250
[2.39,2.395[2.392510.0166670.2666673.333333
[2.395,2.4[2.3975000.2666670
[2.4,2.405[2.402510.0166670.2833333.333333
[2.405,2.41[2.4075000.2833330
[2.41,2.415[2.412520.0333330.3166676.666667
[2.415,2.42[2.4175000.3166670
[2.42,2.425[2.422510.0166670.3333333.333333
[2.425,2.43[2.4275000.3333330
[2.43,2.435[2.4325000.3333330
[2.435,2.44[2.4375000.3333330
[2.44,2.445[2.442550.0833330.41666716.666667
[2.445,2.45[2.4475000.4166670
[2.45,2.455[2.452520.0333330.456.666667
[2.455,2.46[2.4575000.450
[2.46,2.465[2.462510.0166670.4666673.333333
[2.465,2.47[2.4675000.4666670
[2.47,2.475[2.472510.0166670.4833333.333333
[2.475,2.48[2.4775000.4833330
[2.48,2.485[2.482530.050.53333310
[2.485,2.49[2.4875000.5333330
[2.49,2.495[2.492510.0166670.553.333333
[2.495,2.5[2.4975000.550
[2.5,2.505[2.502570.1166670.66666723.333333
[2.505,2.51[2.5075000.6666670
[2.51,2.515[2.512510.0166670.6833333.333333
[2.515,2.52[2.5175000.6833330
[2.52,2.525[2.522510.0166670.73.333333
[2.525,2.53[2.5275000.70
[2.53,2.535[2.5325000.70
[2.535,2.54[2.5375000.70
[2.54,2.545[2.542510.0166670.7166673.333333
[2.545,2.55[2.5475000.7166670
[2.55,2.555[2.5525000.7166670
[2.555,2.56[2.5575000.7166670
[2.56,2.565[2.562510.0166670.7333333.333333
[2.565,2.57[2.5675000.7333330
[2.57,2.575[2.572520.0333330.7666676.666667
[2.575,2.58[2.5775000.7666670
[2.58,2.585[2.582510.0166670.7833333.333333
[2.585,2.59[2.5875000.7833330
[2.59,2.595[2.592510.0166670.83.333333
[2.595,2.6[2.5975000.80
[2.6,2.605[2.602520.0333330.8333336.666667
[2.605,2.61[2.6075000.8333330
[2.61,2.615[2.6125000.8333330
[2.615,2.62[2.6175000.8333330
[2.62,2.625[2.622520.0333330.8666676.666667
[2.625,2.63[2.6275000.8666670
[2.63,2.635[2.632570.1166670.98333323.333333
[2.635,2.64]2.637510.01666713.333333

\begin{tabular}{lllllllll}
\hline
Frequency Table (Histogram) \tabularnewline
Bins & Midpoint & Abs. Frequency & Rel. Frequency & Cumul. Rel. Freq. & Density \tabularnewline
[2.35,2.355[ & 2.3525 & 7 & 0.116667 & 0.116667 & 23.333333 \tabularnewline
[2.355,2.36[ & 2.3575 & 0 & 0 & 0.116667 & 0 \tabularnewline
[2.36,2.365[ & 2.3625 & 6 & 0.1 & 0.216667 & 20 \tabularnewline
[2.365,2.37[ & 2.3675 & 0 & 0 & 0.216667 & 0 \tabularnewline
[2.37,2.375[ & 2.3725 & 2 & 0.033333 & 0.25 & 6.666667 \tabularnewline
[2.375,2.38[ & 2.3775 & 0 & 0 & 0.25 & 0 \tabularnewline
[2.38,2.385[ & 2.3825 & 0 & 0 & 0.25 & 0 \tabularnewline
[2.385,2.39[ & 2.3875 & 0 & 0 & 0.25 & 0 \tabularnewline
[2.39,2.395[ & 2.3925 & 1 & 0.016667 & 0.266667 & 3.333333 \tabularnewline
[2.395,2.4[ & 2.3975 & 0 & 0 & 0.266667 & 0 \tabularnewline
[2.4,2.405[ & 2.4025 & 1 & 0.016667 & 0.283333 & 3.333333 \tabularnewline
[2.405,2.41[ & 2.4075 & 0 & 0 & 0.283333 & 0 \tabularnewline
[2.41,2.415[ & 2.4125 & 2 & 0.033333 & 0.316667 & 6.666667 \tabularnewline
[2.415,2.42[ & 2.4175 & 0 & 0 & 0.316667 & 0 \tabularnewline
[2.42,2.425[ & 2.4225 & 1 & 0.016667 & 0.333333 & 3.333333 \tabularnewline
[2.425,2.43[ & 2.4275 & 0 & 0 & 0.333333 & 0 \tabularnewline
[2.43,2.435[ & 2.4325 & 0 & 0 & 0.333333 & 0 \tabularnewline
[2.435,2.44[ & 2.4375 & 0 & 0 & 0.333333 & 0 \tabularnewline
[2.44,2.445[ & 2.4425 & 5 & 0.083333 & 0.416667 & 16.666667 \tabularnewline
[2.445,2.45[ & 2.4475 & 0 & 0 & 0.416667 & 0 \tabularnewline
[2.45,2.455[ & 2.4525 & 2 & 0.033333 & 0.45 & 6.666667 \tabularnewline
[2.455,2.46[ & 2.4575 & 0 & 0 & 0.45 & 0 \tabularnewline
[2.46,2.465[ & 2.4625 & 1 & 0.016667 & 0.466667 & 3.333333 \tabularnewline
[2.465,2.47[ & 2.4675 & 0 & 0 & 0.466667 & 0 \tabularnewline
[2.47,2.475[ & 2.4725 & 1 & 0.016667 & 0.483333 & 3.333333 \tabularnewline
[2.475,2.48[ & 2.4775 & 0 & 0 & 0.483333 & 0 \tabularnewline
[2.48,2.485[ & 2.4825 & 3 & 0.05 & 0.533333 & 10 \tabularnewline
[2.485,2.49[ & 2.4875 & 0 & 0 & 0.533333 & 0 \tabularnewline
[2.49,2.495[ & 2.4925 & 1 & 0.016667 & 0.55 & 3.333333 \tabularnewline
[2.495,2.5[ & 2.4975 & 0 & 0 & 0.55 & 0 \tabularnewline
[2.5,2.505[ & 2.5025 & 7 & 0.116667 & 0.666667 & 23.333333 \tabularnewline
[2.505,2.51[ & 2.5075 & 0 & 0 & 0.666667 & 0 \tabularnewline
[2.51,2.515[ & 2.5125 & 1 & 0.016667 & 0.683333 & 3.333333 \tabularnewline
[2.515,2.52[ & 2.5175 & 0 & 0 & 0.683333 & 0 \tabularnewline
[2.52,2.525[ & 2.5225 & 1 & 0.016667 & 0.7 & 3.333333 \tabularnewline
[2.525,2.53[ & 2.5275 & 0 & 0 & 0.7 & 0 \tabularnewline
[2.53,2.535[ & 2.5325 & 0 & 0 & 0.7 & 0 \tabularnewline
[2.535,2.54[ & 2.5375 & 0 & 0 & 0.7 & 0 \tabularnewline
[2.54,2.545[ & 2.5425 & 1 & 0.016667 & 0.716667 & 3.333333 \tabularnewline
[2.545,2.55[ & 2.5475 & 0 & 0 & 0.716667 & 0 \tabularnewline
[2.55,2.555[ & 2.5525 & 0 & 0 & 0.716667 & 0 \tabularnewline
[2.555,2.56[ & 2.5575 & 0 & 0 & 0.716667 & 0 \tabularnewline
[2.56,2.565[ & 2.5625 & 1 & 0.016667 & 0.733333 & 3.333333 \tabularnewline
[2.565,2.57[ & 2.5675 & 0 & 0 & 0.733333 & 0 \tabularnewline
[2.57,2.575[ & 2.5725 & 2 & 0.033333 & 0.766667 & 6.666667 \tabularnewline
[2.575,2.58[ & 2.5775 & 0 & 0 & 0.766667 & 0 \tabularnewline
[2.58,2.585[ & 2.5825 & 1 & 0.016667 & 0.783333 & 3.333333 \tabularnewline
[2.585,2.59[ & 2.5875 & 0 & 0 & 0.783333 & 0 \tabularnewline
[2.59,2.595[ & 2.5925 & 1 & 0.016667 & 0.8 & 3.333333 \tabularnewline
[2.595,2.6[ & 2.5975 & 0 & 0 & 0.8 & 0 \tabularnewline
[2.6,2.605[ & 2.6025 & 2 & 0.033333 & 0.833333 & 6.666667 \tabularnewline
[2.605,2.61[ & 2.6075 & 0 & 0 & 0.833333 & 0 \tabularnewline
[2.61,2.615[ & 2.6125 & 0 & 0 & 0.833333 & 0 \tabularnewline
[2.615,2.62[ & 2.6175 & 0 & 0 & 0.833333 & 0 \tabularnewline
[2.62,2.625[ & 2.6225 & 2 & 0.033333 & 0.866667 & 6.666667 \tabularnewline
[2.625,2.63[ & 2.6275 & 0 & 0 & 0.866667 & 0 \tabularnewline
[2.63,2.635[ & 2.6325 & 7 & 0.116667 & 0.983333 & 23.333333 \tabularnewline
[2.635,2.64] & 2.6375 & 1 & 0.016667 & 1 & 3.333333 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=162354&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][2.35,2.355[[/C][C]2.3525[/C][C]7[/C][C]0.116667[/C][C]0.116667[/C][C]23.333333[/C][/ROW]
[ROW][C][2.355,2.36[[/C][C]2.3575[/C][C]0[/C][C]0[/C][C]0.116667[/C][C]0[/C][/ROW]
[ROW][C][2.36,2.365[[/C][C]2.3625[/C][C]6[/C][C]0.1[/C][C]0.216667[/C][C]20[/C][/ROW]
[ROW][C][2.365,2.37[[/C][C]2.3675[/C][C]0[/C][C]0[/C][C]0.216667[/C][C]0[/C][/ROW]
[ROW][C][2.37,2.375[[/C][C]2.3725[/C][C]2[/C][C]0.033333[/C][C]0.25[/C][C]6.666667[/C][/ROW]
[ROW][C][2.375,2.38[[/C][C]2.3775[/C][C]0[/C][C]0[/C][C]0.25[/C][C]0[/C][/ROW]
[ROW][C][2.38,2.385[[/C][C]2.3825[/C][C]0[/C][C]0[/C][C]0.25[/C][C]0[/C][/ROW]
[ROW][C][2.385,2.39[[/C][C]2.3875[/C][C]0[/C][C]0[/C][C]0.25[/C][C]0[/C][/ROW]
[ROW][C][2.39,2.395[[/C][C]2.3925[/C][C]1[/C][C]0.016667[/C][C]0.266667[/C][C]3.333333[/C][/ROW]
[ROW][C][2.395,2.4[[/C][C]2.3975[/C][C]0[/C][C]0[/C][C]0.266667[/C][C]0[/C][/ROW]
[ROW][C][2.4,2.405[[/C][C]2.4025[/C][C]1[/C][C]0.016667[/C][C]0.283333[/C][C]3.333333[/C][/ROW]
[ROW][C][2.405,2.41[[/C][C]2.4075[/C][C]0[/C][C]0[/C][C]0.283333[/C][C]0[/C][/ROW]
[ROW][C][2.41,2.415[[/C][C]2.4125[/C][C]2[/C][C]0.033333[/C][C]0.316667[/C][C]6.666667[/C][/ROW]
[ROW][C][2.415,2.42[[/C][C]2.4175[/C][C]0[/C][C]0[/C][C]0.316667[/C][C]0[/C][/ROW]
[ROW][C][2.42,2.425[[/C][C]2.4225[/C][C]1[/C][C]0.016667[/C][C]0.333333[/C][C]3.333333[/C][/ROW]
[ROW][C][2.425,2.43[[/C][C]2.4275[/C][C]0[/C][C]0[/C][C]0.333333[/C][C]0[/C][/ROW]
[ROW][C][2.43,2.435[[/C][C]2.4325[/C][C]0[/C][C]0[/C][C]0.333333[/C][C]0[/C][/ROW]
[ROW][C][2.435,2.44[[/C][C]2.4375[/C][C]0[/C][C]0[/C][C]0.333333[/C][C]0[/C][/ROW]
[ROW][C][2.44,2.445[[/C][C]2.4425[/C][C]5[/C][C]0.083333[/C][C]0.416667[/C][C]16.666667[/C][/ROW]
[ROW][C][2.445,2.45[[/C][C]2.4475[/C][C]0[/C][C]0[/C][C]0.416667[/C][C]0[/C][/ROW]
[ROW][C][2.45,2.455[[/C][C]2.4525[/C][C]2[/C][C]0.033333[/C][C]0.45[/C][C]6.666667[/C][/ROW]
[ROW][C][2.455,2.46[[/C][C]2.4575[/C][C]0[/C][C]0[/C][C]0.45[/C][C]0[/C][/ROW]
[ROW][C][2.46,2.465[[/C][C]2.4625[/C][C]1[/C][C]0.016667[/C][C]0.466667[/C][C]3.333333[/C][/ROW]
[ROW][C][2.465,2.47[[/C][C]2.4675[/C][C]0[/C][C]0[/C][C]0.466667[/C][C]0[/C][/ROW]
[ROW][C][2.47,2.475[[/C][C]2.4725[/C][C]1[/C][C]0.016667[/C][C]0.483333[/C][C]3.333333[/C][/ROW]
[ROW][C][2.475,2.48[[/C][C]2.4775[/C][C]0[/C][C]0[/C][C]0.483333[/C][C]0[/C][/ROW]
[ROW][C][2.48,2.485[[/C][C]2.4825[/C][C]3[/C][C]0.05[/C][C]0.533333[/C][C]10[/C][/ROW]
[ROW][C][2.485,2.49[[/C][C]2.4875[/C][C]0[/C][C]0[/C][C]0.533333[/C][C]0[/C][/ROW]
[ROW][C][2.49,2.495[[/C][C]2.4925[/C][C]1[/C][C]0.016667[/C][C]0.55[/C][C]3.333333[/C][/ROW]
[ROW][C][2.495,2.5[[/C][C]2.4975[/C][C]0[/C][C]0[/C][C]0.55[/C][C]0[/C][/ROW]
[ROW][C][2.5,2.505[[/C][C]2.5025[/C][C]7[/C][C]0.116667[/C][C]0.666667[/C][C]23.333333[/C][/ROW]
[ROW][C][2.505,2.51[[/C][C]2.5075[/C][C]0[/C][C]0[/C][C]0.666667[/C][C]0[/C][/ROW]
[ROW][C][2.51,2.515[[/C][C]2.5125[/C][C]1[/C][C]0.016667[/C][C]0.683333[/C][C]3.333333[/C][/ROW]
[ROW][C][2.515,2.52[[/C][C]2.5175[/C][C]0[/C][C]0[/C][C]0.683333[/C][C]0[/C][/ROW]
[ROW][C][2.52,2.525[[/C][C]2.5225[/C][C]1[/C][C]0.016667[/C][C]0.7[/C][C]3.333333[/C][/ROW]
[ROW][C][2.525,2.53[[/C][C]2.5275[/C][C]0[/C][C]0[/C][C]0.7[/C][C]0[/C][/ROW]
[ROW][C][2.53,2.535[[/C][C]2.5325[/C][C]0[/C][C]0[/C][C]0.7[/C][C]0[/C][/ROW]
[ROW][C][2.535,2.54[[/C][C]2.5375[/C][C]0[/C][C]0[/C][C]0.7[/C][C]0[/C][/ROW]
[ROW][C][2.54,2.545[[/C][C]2.5425[/C][C]1[/C][C]0.016667[/C][C]0.716667[/C][C]3.333333[/C][/ROW]
[ROW][C][2.545,2.55[[/C][C]2.5475[/C][C]0[/C][C]0[/C][C]0.716667[/C][C]0[/C][/ROW]
[ROW][C][2.55,2.555[[/C][C]2.5525[/C][C]0[/C][C]0[/C][C]0.716667[/C][C]0[/C][/ROW]
[ROW][C][2.555,2.56[[/C][C]2.5575[/C][C]0[/C][C]0[/C][C]0.716667[/C][C]0[/C][/ROW]
[ROW][C][2.56,2.565[[/C][C]2.5625[/C][C]1[/C][C]0.016667[/C][C]0.733333[/C][C]3.333333[/C][/ROW]
[ROW][C][2.565,2.57[[/C][C]2.5675[/C][C]0[/C][C]0[/C][C]0.733333[/C][C]0[/C][/ROW]
[ROW][C][2.57,2.575[[/C][C]2.5725[/C][C]2[/C][C]0.033333[/C][C]0.766667[/C][C]6.666667[/C][/ROW]
[ROW][C][2.575,2.58[[/C][C]2.5775[/C][C]0[/C][C]0[/C][C]0.766667[/C][C]0[/C][/ROW]
[ROW][C][2.58,2.585[[/C][C]2.5825[/C][C]1[/C][C]0.016667[/C][C]0.783333[/C][C]3.333333[/C][/ROW]
[ROW][C][2.585,2.59[[/C][C]2.5875[/C][C]0[/C][C]0[/C][C]0.783333[/C][C]0[/C][/ROW]
[ROW][C][2.59,2.595[[/C][C]2.5925[/C][C]1[/C][C]0.016667[/C][C]0.8[/C][C]3.333333[/C][/ROW]
[ROW][C][2.595,2.6[[/C][C]2.5975[/C][C]0[/C][C]0[/C][C]0.8[/C][C]0[/C][/ROW]
[ROW][C][2.6,2.605[[/C][C]2.6025[/C][C]2[/C][C]0.033333[/C][C]0.833333[/C][C]6.666667[/C][/ROW]
[ROW][C][2.605,2.61[[/C][C]2.6075[/C][C]0[/C][C]0[/C][C]0.833333[/C][C]0[/C][/ROW]
[ROW][C][2.61,2.615[[/C][C]2.6125[/C][C]0[/C][C]0[/C][C]0.833333[/C][C]0[/C][/ROW]
[ROW][C][2.615,2.62[[/C][C]2.6175[/C][C]0[/C][C]0[/C][C]0.833333[/C][C]0[/C][/ROW]
[ROW][C][2.62,2.625[[/C][C]2.6225[/C][C]2[/C][C]0.033333[/C][C]0.866667[/C][C]6.666667[/C][/ROW]
[ROW][C][2.625,2.63[[/C][C]2.6275[/C][C]0[/C][C]0[/C][C]0.866667[/C][C]0[/C][/ROW]
[ROW][C][2.63,2.635[[/C][C]2.6325[/C][C]7[/C][C]0.116667[/C][C]0.983333[/C][C]23.333333[/C][/ROW]
[ROW][C][2.635,2.64][/C][C]2.6375[/C][C]1[/C][C]0.016667[/C][C]1[/C][C]3.333333[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=162354&T=1

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

As an alternative you can also use a QR Code:  

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

Frequency Table (Histogram)
BinsMidpointAbs. FrequencyRel. FrequencyCumul. Rel. Freq.Density
[2.35,2.355[2.352570.1166670.11666723.333333
[2.355,2.36[2.3575000.1166670
[2.36,2.365[2.362560.10.21666720
[2.365,2.37[2.3675000.2166670
[2.37,2.375[2.372520.0333330.256.666667
[2.375,2.38[2.3775000.250
[2.38,2.385[2.3825000.250
[2.385,2.39[2.3875000.250
[2.39,2.395[2.392510.0166670.2666673.333333
[2.395,2.4[2.3975000.2666670
[2.4,2.405[2.402510.0166670.2833333.333333
[2.405,2.41[2.4075000.2833330
[2.41,2.415[2.412520.0333330.3166676.666667
[2.415,2.42[2.4175000.3166670
[2.42,2.425[2.422510.0166670.3333333.333333
[2.425,2.43[2.4275000.3333330
[2.43,2.435[2.4325000.3333330
[2.435,2.44[2.4375000.3333330
[2.44,2.445[2.442550.0833330.41666716.666667
[2.445,2.45[2.4475000.4166670
[2.45,2.455[2.452520.0333330.456.666667
[2.455,2.46[2.4575000.450
[2.46,2.465[2.462510.0166670.4666673.333333
[2.465,2.47[2.4675000.4666670
[2.47,2.475[2.472510.0166670.4833333.333333
[2.475,2.48[2.4775000.4833330
[2.48,2.485[2.482530.050.53333310
[2.485,2.49[2.4875000.5333330
[2.49,2.495[2.492510.0166670.553.333333
[2.495,2.5[2.4975000.550
[2.5,2.505[2.502570.1166670.66666723.333333
[2.505,2.51[2.5075000.6666670
[2.51,2.515[2.512510.0166670.6833333.333333
[2.515,2.52[2.5175000.6833330
[2.52,2.525[2.522510.0166670.73.333333
[2.525,2.53[2.5275000.70
[2.53,2.535[2.5325000.70
[2.535,2.54[2.5375000.70
[2.54,2.545[2.542510.0166670.7166673.333333
[2.545,2.55[2.5475000.7166670
[2.55,2.555[2.5525000.7166670
[2.555,2.56[2.5575000.7166670
[2.56,2.565[2.562510.0166670.7333333.333333
[2.565,2.57[2.5675000.7333330
[2.57,2.575[2.572520.0333330.7666676.666667
[2.575,2.58[2.5775000.7666670
[2.58,2.585[2.582510.0166670.7833333.333333
[2.585,2.59[2.5875000.7833330
[2.59,2.595[2.592510.0166670.83.333333
[2.595,2.6[2.5975000.80
[2.6,2.605[2.602520.0333330.8333336.666667
[2.605,2.61[2.6075000.8333330
[2.61,2.615[2.6125000.8333330
[2.615,2.62[2.6175000.8333330
[2.62,2.625[2.622520.0333330.8666676.666667
[2.625,2.63[2.6275000.8666670
[2.63,2.635[2.632570.1166670.98333323.333333
[2.635,2.64]2.637510.01666713.333333



Parameters (Session):
par1 = 24 ; par2 = grey ; par3 = FALSE ; par4 = Unknown ;
Parameters (R input):
par1 = 48 ; par2 = grey ; par3 = FALSE ; par4 = Unknown ;
R code (references can be found in the software module):
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('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')
}