Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_cronbach.wasp
Title produced by softwareCronbach Alpha
Date of computationFri, 24 Dec 2010 11:16:47 +0000
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2010/Dec/24/t1293193402eh3m3oihs6iy48q.htm/, Retrieved Tue, 30 Apr 2024 05:42:55 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=114839, Retrieved Tue, 30 Apr 2024 05:42:55 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact127
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Cronbach Alpha] [Cronbach Alpha 1] [2010-12-24 11:16:47] [0dbff7218d83c9f93b81320e51e185be] [Current]
Feedback Forum

Post a new message
Dataseries X:
3	3	3	3	2	3	3	3	3	3	3	3	3	3	3	3	3	3
5	5	1	5	4	1	1	5	5	0	4	4	4	1	5	4	5	5
4	4	4	4	3	3	3	4	3	3	4	4	5	2	4	4	4	4
4	4	3	4	3	3	2	4	4	2	4	4	4	2	4	2	4	4
5	5	2	4	4	1	2	5	4	3	4	4	5	1	3	4	4	4
5	5	1	3	5	1	3	1	5	1	5	3	5	1	5	3	5	5
2	4	2	1	4	5	5	5	3	5	3	5	5	3	1	5	2	3
5	5	1	4	4	2	1	5	4	2	4	4	4	1	5	5	4	4
4	4	2	4	4	2	2	5	4	2	4	5	4	1	4	3	4	4
4	4	2	4	5	2	2	5	5	2	5	5	5	2	2	4	4	4
5	4	2	4	5	4	1	1	5	1	5	5	5	1	5	5	4	5
3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3
5	4	2	4	4	2	2	3	4	4	4	2	3	2	4	4	4	4
3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3
5	5	1	4	5	1	1	5	5	1	5	5	5	1	5	4	4	5
3	3	3	3	3	3	3	3	3	3	5	4	4	3	3	3	3	3
4	5	2	5	4	2	1	4	4	2	4	4	4	2	4	4	4	4
5	5	1	4	5	1	1	5	5	1	5	5	5	1	4	5	5	5
4	4	2	3	4	3	3	4	4	4	4	4	4	2	3	4	3	3
3	3	3	3	3	3	3	5	3	3	3	3	3	3	3	4	3	3
4	4	2	4	4	2	2	4	4	3	4	4	3	3	4	3	3	3
4	4	2	3	4	2	3	4	4	3	5	4	3	2	4	4	3	4
3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3
3	3	4	3	3	3	3	4	4	4	4	4	3	3	3	3	3	3
4	5	2	5	5	1	1	5	4	1	5	5	5	1	5	5	4	5
5	5	1	5	4	1	1	1	4	2	5	5	4	1	5	4	4	5
4	4	2	4	3	1	1	4	4	1	4	3	5	1	5	4	4	4
4	4	4	4	4	1	2	4	4	4	4	4	4	2	4	4	4	4
4	4	1	5	5	1	1	4	4	2	4	4	4	1	4	4	4	4
4	4	3	4	4	3	2	4	4	3	4	4	4	4	4	4	4	4
4	4	2	4	4	1	1	4	4	2	5	5	4	1	5	5	4	5
3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3
4	4	2	4	4	1	2	4	4	4	4	3	4	1	4	4	4	4
5	4	2	4	5	2	2	5	5	2	5	5	5	1	5	5	5	5
4	4	2	4	2	1	1	4	4	1	4	4	4	1	4	4	4	4
4	4	2	4	4	2	2	4	4	2	4	4	3	2	4	4	4	4
3	3	3	4	3	2	2	4	4	3	4	2	5	3	3	3	4	4
4	4	2	4	4	2	2	4	3	2	4	4	4	2	4	4	4	4
4	4	1	3	3	1	3	5	5	2	5	4	5	1	4	4	4	4
4	4	2	4	2	3	2	4	4	2	4	4	4	2	4	4	4	4
5	5	1	2	5	1	3	4	5	2	4	2	5	1	3	5	3	4
4	4	1	4	4	1	1	4	4	2	4	4	4	2	4	4	4	4
3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3
3	3	3	3	1	3	3	3	3	3	3	3	3	3	3	3	3	3
4	4	2	4	4	1	2	4	3	4	4	4	5	3	3	4	4	4
4	3	2	3	2	2	2	5	4	2	4	4	5	2	4	3	3	4
4	4	4	4	3	4	2	4	4	2	4	4	4	4	4	4	4	4
5	4	1	4	5	2	2	4	4	2	4	4	3	1	4	4	4	4
4	4	2	4	3	1	1	4	4	2	4	4	5	1	4	4	3	4
5	4	2	4	4	1	2	4	4	2	4	4	4	1	4	4	4	4
4	4	2	4	4	2	2	4	4	2	4	4	4	2	4	4	4	4
4	4	2	4	2	2	2	4	4	2	4	3	3	2	4	3	4	4
4	4	3	3	2	3	2	4	4	3	3	1	5	1	4	4	4	3
4	4	4	4	4	5	5	4	4	4	4	4	4	4	4	4	5	5
4	2	2	3	3	2	2	3	3	2	4	2	4	2	4	4	3	4
5	4	1	4	5	1	2	4	4	3	5	4	3	1	4	4	4	4
4	4	2	4	5	1	1	4	4	3	4	4	4	2	4	4	4	4
4	4	3	3	3	1	2	2	4	3	5	4	3	2	2	5	4	5
4	4	3	4	4	1	1	4	4	2	4	4	4	1	4	3	4	4
4	4	2	4	3	2	2	4	4	3	4	4	4	2	4	4	4	4
3	3	4	3	2	2	3	3	3	4	4	3	5	4	3	3	3	2
4	4	1	4	4	2	1	4	4	2	4	5	5	1	4	4	4	4
5	4	1	4	5	1	1	5	4	3	5	4	5	1	5	4	4	0
1	2	4	3	4	3	3	4	3	4	4	3	4	2	1	4	3	2
3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3
5	4	1	4	2	1	1	5	4	2	5	5	3	1	5	5	4	5
4	4	4	4	4	2	2	4	4	3	4	4	4	3	3	4	4	3
4	3	2	4	2	1	1	5	4	1	5	3	4	1	4	3	4	4
3	3	3	4	2	3	3	4	3	3	4	4	5	2	4	4	4	3
4	4	2	3	4	2	2	2	4	2	4	4	4	2	4	4	4	4
4	4	3	4	4	2	2	4	4	4	4	4	4	4	4	4	4	4
3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3
5	5	1	3	5	1	1	4	4	1	5	4	5	1	4	4	4	4
4	3	1	3	3	1	3	5	4	1	4	3	3	1	5	3	3	3
5	4	1	5	5	1	1	5	5	1	5	4	4	1	4	4	5	4
4	4	1	4	4	2	1	5	5	3	4	4	5	1	4	5	5	5
4	4	3	4	4	2	2	3	4	2	4	4	4	2	4	4	4	4
4	4	2	2	4	1	4	4	4	2	4	4	4	2	4	4	4	4
4	4	2	4	5	1	2	5	4	2	5	4	4	1	4	4	4	4
3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3
5	5	2	4	4	1	1	1	5	1	5	4	5	1	5	4	4	4
5	5	2	4	4	2	2	4	4	2	4	4	2	2	4	4	3	4
4	4	3	4	4	1	2	3	4	2	4	4	5	1	4	4	5	3
4	4	2	4	4	2	2	4	4	2	5	3	4	2	4	4	4	4
5	4	2	4	3	1	2	4	5	1	5	4	4	2	4	4	4	5
4	4	1	4	5	1	2	4	4	2	4	4	4	2	4	4	4	4
4	4	3	4	3	2	2	3	4	3	4	3	5	2	4	5	4	4
3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3
4	4	2	4	3	2	2	4	4	4	4	4	5	2	4	4	4	4
4	4	1	3	4	2	3	5	5	3	4	4	4	1	4	4	4	4
3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3
5	4	2	5	5	2	1	4	4	3	4	4	5	1	4	4	4	4
5	4	1	4	5	1	1	4	4	1	4	5	5	1	4	5	4	4
5	4	1	5	4	1	2	4	4	2	5	4	5	1	4	4	5	4
4	4	2	4	3	1	1	5	4	1	5	5	5	1	5	4	4	4
4	4	2	3	4	2	2	4	4	3	4	4	4	2	4	3	4	4
4	4	1	3	4	1	1	4	4	1	5	4	4	1	5	4	4	4
4	4	2	4	4	1	1	5	4	1	5	4	5	1	5	4	5	4
4	4	2	4	4	1	1	4	4	1	5	4	3	2	4	4	5	4
4	4	2	4	5	2	1	4	4	2	4	4	5	1	4	4	4	4
4	4	3	5	4	1	3	4	4	3	5	4	4	1	4	4	4	4
5	5	1	5	5	1	1	5	5	3	5	5	5	1	5	3	4	5
4	4	2	3	3	3	3	4	4	3	4	4	4	2	4	3	4	4
4	5	2	5	4	1	1	4	5	2	5	4	4	1	4	4	4	4
3	4	3	4	4	2	2	3	4	2	4	4	4	2	4	3	4	4
5	4	1	4	5	3	1	5	4	2	4	4	4	2	4	4	4	4
4	4	3	4	4	2	1	4	4	2	4	4	3	1	4	4	3	4
3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3
2	3	5	4	2	4	3	3	2	5	4	1	1	2	3	3	3	4
5	5	1	5	4	1	1	5	5	3	5	5	5	1	5	5	5	0
4	4	2	4	4	1	1	4	4	2	4	4	4	2	4	4	4	4
5	5	1	5	5	2	2	5	5	1	5	5	5	1	5	5	5	5
1	1	1	1	1	1	1	1	1	1	1	1	1	1	1	1	1	1
5	5	1	5	4	2	1	4	4	2	4	5	2	2	4	4	4	4
5	4	1	5	4	1	1	5	5	3	5	5	5	1	5	5	5	5
3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3
4	4	2	4	4	0	2	4	4	4	4	4	4	4	4	4	4	4
5	4	2	4	3	3	1	4	4	4	4	3	5	2	4	4	3	4
5	5	1	5	5	1	1	5	5	1	5	5	5	1	5	5	5	5
3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3
4	4	2	3	5	1	1	4	4	2	5	4	5	2	5	4	3	4
5	5	1	5	5	1	1	5	5	1	5	5	5	1	5	5	4	5
4	4	1	3	5	1	3	5	5	2	4	4	5	2	4	4	4	4
4	4	3	5	4	3	1	5	4	4	3	4	5	1	5	4	4	4
4	4	1	4	4	2	1	4	5	2	5	4	5	1	5	4	4	4
5	5	1	5	5	1	1	5	5	1	5	5	5	1	5	5	5	5
4	4	1	4	4	2	2	4	4	2	4	4	4	1	4	4	4	4
5	5	2	4	5	4	2	5	5	1	5	5	5	2	4	5	4	5
4	4	2	4	4	2	2	4	4	2	4	4	4	2	4	4	4	4
4	4	2	4	4	1	1	3	4	3	4	4	4	2	4	3	4	4
4	3	4	4	4	2	2	4	4	2	4	3	4	2	4	2	4	4
4	4	2	4	2	1	1	5	4	2	5	5	5	2	5	4	4	4
3	3	2	2	3	2	2	4	4	2	4	4	3	2	4	3	4	4
4	4	3	4	4	2	2	4	4	1	5	4	4	2	4	4	5	4
5	5	1	5	5	1	1	5	4	2	5	4	0	1	5	5	5	5
3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3
4	4	3	3	4	3	3	4	3	4	4	4	4	3	4	3	4	4
3	3	4	3	4	4	4	3	3	4	4	3	4	2	3	3	3	3
4	4	3	2	5	2	4	3	5	3	4	3	5	1	4	1	3	4
3	4	2	4	4	1	2	4	4	3	4	3	4	2	4	3	4	4
3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3
5	4	1	5	4	1	2	5	5	2	5	5	5	1	4	4	5	5
5	5	1	4	4	1	1	5	5	2	5	5	5	1	4	5	5	5
5	4	2	4	4	1	1	4	4	2	5	4	5	2	4	4	4	4
5	5	1	4	5	1	1	5	5	1	5	5	5	1	5	5	5	5
5	4	1	4	5	3	2	5	5	3	5	4	5	1	4	3	3	4
4	4	3	3	3	2	3	3	3	3	4	3	3	3	4	4	3	3
4	4	3	5	4	2	1	5	4	2	4	4	4	2	4	4	4	5
4	4	2	4	4	1	2	4	4	4	4	4	4	2	4	5	5	4
5	4	2	4	4	1	1	5	5	2	5	5	5	1	5	5	5	5
5	4	1	5	5	2	1	5	4	2	3	4	5	2	4	5	4	4
4	4	2	4	1	1	1	4	4	3	4	4	4	1	4	4	4	4
4	4	2	4	4	2	2	4	4	2	4	4	4	2	4	4	4	4
4	3	2	5	4	2	2	4	4	3	4	4	3	3	4	4	4	4
5	5	1	5	5	2	1	4	5	3	4	5	2	3	4	5	4	5
3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3	3
4	4	3	4	4	1	3	4	4	4	4	4	4	1	4	3	4	4
5	5	2	4	5	4	2	5	5	1	5	5	5	2	4	5	4	5
5	4	1	4	5	1	1	5	5	2	4	4	5	1	5	5	5	4
5	5	1	5	5	1	1	1	5	2	5	4	5	1	5	5	5	5
5	4	4	5	4	3	1	3	4	5	4	5	3	2	4	4	5	4




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time7 seconds
R Server'Sir Ronald Aylmer Fisher' @ 193.190.124.24

\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 & 7 seconds \tabularnewline
R Server & 'Sir Ronald Aylmer Fisher' @ 193.190.124.24 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=114839&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]7 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Sir Ronald Aylmer Fisher' @ 193.190.124.24[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=114839&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=114839&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 time7 seconds
R Server'Sir Ronald Aylmer Fisher' @ 193.190.124.24







Cronbach Alpha and Related Statistics
ItemsCronbach AlphaStd. AlphaG6(smc)Average R
All itmes0.66950.72750.86780.1292
Q32_1 excluded0.61490.67990.84120.1111
Q32_2 excluded0.61560.67630.84120.1094
Q32_3 excluded0.72940.7750.8810.1685
Q32_4 excluded0.62710.69150.84530.1165
Q32_5 excluded0.62260.69340.85480.1174
Q32_6 excluded0.71910.76630.88050.1617
Q32_7 excluded0.72860.77650.88060.1697
Q32_8 excluded0.64170.70750.8630.1246
Q32_9 excluded0.61540.67670.83890.1096
Q32_10 excluded0.71950.76540.88210.161
Q32_11 excluded0.62420.68490.84610.1134
Q32_12 excluded0.61240.68180.84630.1119
Q32_13 excluded0.63660.70360.85980.1225
Q32_14 excluded0.7220.77390.88440.1676
Q32_15 excluded0.63360.69470.85090.1181
Q32_16 excluded0.6220.68770.84950.1147
Q32_17 excluded0.6190.67970.84260.111
Q32_18 excluded0.62550.69130.85330.1164

\begin{tabular}{lllllllll}
\hline
Cronbach Alpha and Related Statistics \tabularnewline
Items & Cronbach Alpha & Std. Alpha & G6(smc) & Average R \tabularnewline
All itmes & 0.6695 & 0.7275 & 0.8678 & 0.1292 \tabularnewline
Q32_1 excluded & 0.6149 & 0.6799 & 0.8412 & 0.1111 \tabularnewline
Q32_2 excluded & 0.6156 & 0.6763 & 0.8412 & 0.1094 \tabularnewline
Q32_3 excluded & 0.7294 & 0.775 & 0.881 & 0.1685 \tabularnewline
Q32_4 excluded & 0.6271 & 0.6915 & 0.8453 & 0.1165 \tabularnewline
Q32_5 excluded & 0.6226 & 0.6934 & 0.8548 & 0.1174 \tabularnewline
Q32_6 excluded & 0.7191 & 0.7663 & 0.8805 & 0.1617 \tabularnewline
Q32_7 excluded & 0.7286 & 0.7765 & 0.8806 & 0.1697 \tabularnewline
Q32_8 excluded & 0.6417 & 0.7075 & 0.863 & 0.1246 \tabularnewline
Q32_9 excluded & 0.6154 & 0.6767 & 0.8389 & 0.1096 \tabularnewline
Q32_10 excluded & 0.7195 & 0.7654 & 0.8821 & 0.161 \tabularnewline
Q32_11 excluded & 0.6242 & 0.6849 & 0.8461 & 0.1134 \tabularnewline
Q32_12 excluded & 0.6124 & 0.6818 & 0.8463 & 0.1119 \tabularnewline
Q32_13 excluded & 0.6366 & 0.7036 & 0.8598 & 0.1225 \tabularnewline
Q32_14 excluded & 0.722 & 0.7739 & 0.8844 & 0.1676 \tabularnewline
Q32_15 excluded & 0.6336 & 0.6947 & 0.8509 & 0.1181 \tabularnewline
Q32_16 excluded & 0.622 & 0.6877 & 0.8495 & 0.1147 \tabularnewline
Q32_17 excluded & 0.619 & 0.6797 & 0.8426 & 0.111 \tabularnewline
Q32_18 excluded & 0.6255 & 0.6913 & 0.8533 & 0.1164 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=114839&T=1

[TABLE]
[ROW][C]Cronbach Alpha and Related Statistics[/C][/ROW]
[ROW][C]Items[/C][C]Cronbach Alpha[/C][C]Std. Alpha[/C][C]G6(smc)[/C][C]Average R[/C][/ROW]
[ROW][C]All itmes[/C][C]0.6695[/C][C]0.7275[/C][C]0.8678[/C][C]0.1292[/C][/ROW]
[ROW][C]Q32_1 excluded[/C][C]0.6149[/C][C]0.6799[/C][C]0.8412[/C][C]0.1111[/C][/ROW]
[ROW][C]Q32_2 excluded[/C][C]0.6156[/C][C]0.6763[/C][C]0.8412[/C][C]0.1094[/C][/ROW]
[ROW][C]Q32_3 excluded[/C][C]0.7294[/C][C]0.775[/C][C]0.881[/C][C]0.1685[/C][/ROW]
[ROW][C]Q32_4 excluded[/C][C]0.6271[/C][C]0.6915[/C][C]0.8453[/C][C]0.1165[/C][/ROW]
[ROW][C]Q32_5 excluded[/C][C]0.6226[/C][C]0.6934[/C][C]0.8548[/C][C]0.1174[/C][/ROW]
[ROW][C]Q32_6 excluded[/C][C]0.7191[/C][C]0.7663[/C][C]0.8805[/C][C]0.1617[/C][/ROW]
[ROW][C]Q32_7 excluded[/C][C]0.7286[/C][C]0.7765[/C][C]0.8806[/C][C]0.1697[/C][/ROW]
[ROW][C]Q32_8 excluded[/C][C]0.6417[/C][C]0.7075[/C][C]0.863[/C][C]0.1246[/C][/ROW]
[ROW][C]Q32_9 excluded[/C][C]0.6154[/C][C]0.6767[/C][C]0.8389[/C][C]0.1096[/C][/ROW]
[ROW][C]Q32_10 excluded[/C][C]0.7195[/C][C]0.7654[/C][C]0.8821[/C][C]0.161[/C][/ROW]
[ROW][C]Q32_11 excluded[/C][C]0.6242[/C][C]0.6849[/C][C]0.8461[/C][C]0.1134[/C][/ROW]
[ROW][C]Q32_12 excluded[/C][C]0.6124[/C][C]0.6818[/C][C]0.8463[/C][C]0.1119[/C][/ROW]
[ROW][C]Q32_13 excluded[/C][C]0.6366[/C][C]0.7036[/C][C]0.8598[/C][C]0.1225[/C][/ROW]
[ROW][C]Q32_14 excluded[/C][C]0.722[/C][C]0.7739[/C][C]0.8844[/C][C]0.1676[/C][/ROW]
[ROW][C]Q32_15 excluded[/C][C]0.6336[/C][C]0.6947[/C][C]0.8509[/C][C]0.1181[/C][/ROW]
[ROW][C]Q32_16 excluded[/C][C]0.622[/C][C]0.6877[/C][C]0.8495[/C][C]0.1147[/C][/ROW]
[ROW][C]Q32_17 excluded[/C][C]0.619[/C][C]0.6797[/C][C]0.8426[/C][C]0.111[/C][/ROW]
[ROW][C]Q32_18 excluded[/C][C]0.6255[/C][C]0.6913[/C][C]0.8533[/C][C]0.1164[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=114839&T=1

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

As an alternative you can also use a QR Code:  

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

Cronbach Alpha and Related Statistics
ItemsCronbach AlphaStd. AlphaG6(smc)Average R
All itmes0.66950.72750.86780.1292
Q32_1 excluded0.61490.67990.84120.1111
Q32_2 excluded0.61560.67630.84120.1094
Q32_3 excluded0.72940.7750.8810.1685
Q32_4 excluded0.62710.69150.84530.1165
Q32_5 excluded0.62260.69340.85480.1174
Q32_6 excluded0.71910.76630.88050.1617
Q32_7 excluded0.72860.77650.88060.1697
Q32_8 excluded0.64170.70750.8630.1246
Q32_9 excluded0.61540.67670.83890.1096
Q32_10 excluded0.71950.76540.88210.161
Q32_11 excluded0.62420.68490.84610.1134
Q32_12 excluded0.61240.68180.84630.1119
Q32_13 excluded0.63660.70360.85980.1225
Q32_14 excluded0.7220.77390.88440.1676
Q32_15 excluded0.63360.69470.85090.1181
Q32_16 excluded0.6220.68770.84950.1147
Q32_17 excluded0.6190.67970.84260.111
Q32_18 excluded0.62550.69130.85330.1164



Parameters (Session):
Parameters (R input):
R code (references can be found in the software module):
library(psych)
z <- t(y)
(r <- alpha(z))
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Cronbach Alpha and Related Statistics',5,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Items',1,TRUE)
a<-table.element(a,'Cronbach Alpha',1,TRUE)
a<-table.element(a,'Std. Alpha',1,TRUE)
a<-table.element(a,'G6(smc)',1,TRUE)
a<-table.element(a,'Average R',1,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'All itmes',header=TRUE)
a<-table.element(a,round(r$total['raw_alpha'],4))
a<-table.element(a,round(r$total['std.alpha'],4))
a<-table.element(a,round(r$total['G6(smc)'],4))
a<-table.element(a,round(r$total['average_r'],4))
a<-table.row.end(a)
n = length(z[1,])
for (i in 1:n) {
a<-table.row.start(a)
a<-table.element(a,paste(colnames(z)[i],' excluded',sep=''),header=TRUE)
a<-table.element(a,round(r$alpha.drop[i,'raw_alpha'],4))
a<-table.element(a,round(r$alpha.drop[i,'std.alpha'],4))
a<-table.element(a,round(r$alpha.drop[i,'G6(smc)'],4))
a<-table.element(a,round(r$alpha.drop[i,'average_r'],4))
a<-table.row.end(a)
}
a<-table.end(a)
table.save(a,file='mytable.tab')