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 16:14:17 +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/t1293207146bir3w8rm8qiwklo.htm/, Retrieved Tue, 30 Apr 2024 03:45:12 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=115177, Retrieved Tue, 30 Apr 2024 03:45:12 +0000
QR Codes:

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

Post a new message
Dataseries X:
3	3	6	3	2	6	6	3	3	6	3	3	3	6	3	3	3	3
5	5	6	5	4	6	6	5	5	6	4	4	4	6	5	4	5	5
4	4	6	4	3	6	6	4	3	6	4	4	5	6	4	4	4	4
4	4	6	4	3	6	6	4	4	6	4	4	4	6	4	2	4	4
5	5	3	4	4	5	5	5	4	5	4	4	5	3	3	4	4	4
5	5	1	3	5	5	5	1	5	5	5	3	5	1	5	3	5	5
2	4	3	1	4	5	5	5	3	3	3	5	5	2	1	5	2	3
5	5	3	4	4	4	5	5	4	4	4	4	4	2	5	5	4	4
4	4	2	4	4	4	4	5	4	3	4	5	4	1	4	3	4	4
4	4	1	4	5	5	5	5	5	4	5	5	5	1	2	4	4	4
5	4	2	4	5	3	2	1	5	3	5	5	5	2	5	5	4	5
3	3	2	3	3	5	5	3	3	4	3	3	3	1	3	3	3	3
5	4	2	4	4	5	5	3	4	4	4	2	3	2	4	4	4	4
3	3	2	3	3	5	4	3	3	4	3	3	3	2	3	3	3	3
5	5	2	4	5	5	5	5	5	5	5	5	5	2	5	4	4	5
3	3	1	3	3	5	5	3	3	5	5	4	4	3	3	3	3	3
4	5	4	5	4	5	4	4	4	3	4	4	4	2	4	4	4	4
5	5	2	4	5	5	5	5	5	3	5	5	5	3	4	5	5	5
4	4	1	3	4	5	5	4	4	4	4	4	4	1	3	4	3	3
3	3	2	3	3	4	5	5	3	3	3	3	3	3	3	4	3	3
4	4	2	4	4	4	5	4	4	5	4	4	3	1	4	3	3	3
4	4	2	3	4	5	5	4	4	5	5	4	3	1	4	4	3	4
3	3	2	3	3	5	5	3	3	4	3	3	3	2	3	3	3	3
3	3	1	3	3	5	4	4	4	5	4	4	3	3	3	3	3	3
4	5	2	5	5	5	5	5	4	6	5	5	5	2	5	5	4	5
5	5	3	5	4	4	4	1	4	4	5	5	4	2	5	4	4	5
4	4	3	4	3	5	5	4	4	4	4	3	5	3	5	4	4	4
4	4	3	4	4	4	4	4	4	4	4	4	4	3	4	4	4	4
4	4	1	5	5	5	5	4	4	5	4	4	4	1	4	4	4	4
4	4	4	4	4	5	5	4	4	4	4	4	4	1	4	4	4	4
4	4	2	4	4	5	5	4	4	4	5	5	4	2	5	5	4	5
3	3	2	3	3	5	4	3	3	3	3	3	3	2	3	3	3	3
4	4	2	4	4	5	5	4	4	3	4	3	4	2	4	4	4	4
5	4	3	4	5	3	5	5	5	5	5	5	5	2	5	5	5	5
4	4	2	4	2	5	5	4	4	4	4	4	4	2	4	4	4	4
4	4	3	4	4	5	4	4	4	5	4	4	3	3	4	4	4	4
3	3	2	4	3	5	5	4	4	5	4	2	5	2	3	3	4	4
4	4	2	4	4	5	5	4	3	5	4	4	4	2	4	4	4	4
4	4	2	3	3	5	5	5	5	4	5	4	5	2	4	4	4	4
4	4	2	4	2	5	5	4	4	5	4	4	4	2	4	4	4	4
5	5	4	2	5	3	4	4	5	4	4	2	5	3	3	5	3	4
4	4	2	4	4	4	5	4	4	4	4	4	4	2	4	4	4	4
3	3	1	3	3	5	5	3	3	4	3	3	3	2	3	3	3	3
3	3	3	3	1	5	5	3	3	5	3	3	3	2	3	3	3	3
4	4	2	4	4	4	5	4	3	5	4	4	5	1	3	4	4	4
4	3	2	3	2	4	5	5	4	3	4	4	5	2	4	3	3	4
4	4	1	4	3	5	5	4	4	5	4	4	4	3	4	4	4	4
5	4	3	4	5	4	5	4	4	4	4	4	3	3	4	4	4	4
4	4	2	4	3	5	5	4	4	4	4	4	5	2	4	4	3	4
5	4	3	4	4	4	5	4	4	5	4	4	4	3	4	4	4	4
4	4	2	4	4	5	5	4	4	5	4	4	4	2	4	4	4	4
4	4	2	4	2	5	5	4	4	4	4	3	3	2	4	3	4	4
4	4	1	3	2	5	5	4	4	3	3	1	5	2	4	4	4	3
4	4	2	4	4	5	5	4	4	5	4	4	4	2	4	4	5	5
4	2	3	3	3	5	5	3	3	5	4	2	4	2	4	4	3	4
5	4	3	4	5	4	5	4	4	3	5	4	3	2	4	4	4	4
4	4	2	4	5	4	4	4	4	3	4	4	4	2	4	4	4	4
4	4	3	3	3	5	4	2	4	4	5	4	3	2	2	5	4	5
4	4	2	4	4	5	5	4	4	3	4	4	4	4	4	3	4	4
4	4	2	4	3	4	5	4	4	4	4	4	4	2	4	4	4	4
3	3	2	3	2	5	5	3	3	4	4	3	5	2	3	3	3	2
4	4	3	4	4	5	4	4	4	5	4	5	5	2	4	4	4	4
5	4	3	4	5	5	5	5	4	5	5	4	5	2	5	4	4	0
1	2	3	3	4	5	5	4	3	3	4	3	4	2	1	4	3	2
3	3	3	3	3	3	4	3	3	3	3	3	3	3	3	3	3	3
5	4	2	4	2	5	5	5	4	4	5	5	3	2	5	5	4	5
4	4	2	4	4	4	5	4	4	5	4	4	4	2	3	4	4	3
4	3	2	4	2	5	5	5	4	4	5	3	4	4	4	3	4	4
3	3	2	4	2	5	5	4	3	4	4	4	5	3	4	4	4	3
4	4	3	3	4	5	5	2	4	5	4	4	4	2	4	4	4	4
4	4	3	4	4	4	4	4	4	4	4	4	4	2	4	4	4	4
3	3	3	3	3	5	5	3	3	5	3	3	3	3	3	3	3	3
5	5	2	3	5	5	5	4	4	4	5	4	5	3	4	4	4	4
4	3	2	3	3	4	4	5	4	4	4	3	3	2	5	3	3	3
5	4	2	5	5	4	5	5	5	4	5	4	4	2	4	4	5	4
4	4	1	4	4	5	5	5	5	2	4	4	5	3	4	5	5	5
4	4	2	4	4	5	5	3	4	3	4	4	4	1	4	4	4	4
4	4	2	2	4	5	5	4	4	5	4	4	4	3	4	4	4	4
4	4	3	4	5	5	5	5	4	4	5	4	4	2	4	4	4	4
3	3	2	3	3	3	3	3	3	3	3	3	3	2	3	3	3	3
5	5	1	4	4	5	4	1	5	4	5	4	5	2	5	4	4	4
5	5	1	4	4	4	5	4	4	4	4	4	2	2	4	4	3	4
4	4	2	4	4	5	5	3	4	4	4	4	5	3	4	4	5	3
4	4	2	4	4	3	5	4	4	5	5	3	4	1	4	4	4	4
5	4	2	4	3	5	5	4	5	5	5	4	4	6	4	4	4	5
4	4	3	4	5	5	5	4	4	5	4	4	4	1	4	4	4	4
4	4	2	4	3	5	5	3	4	2	4	3	5	2	4	5	4	4
3	3	2	3	3	5	5	3	3	4	3	3	3	2	3	3	3	3
4	4	2	4	3	5	5	4	4	4	4	4	5	2	4	4	4	4
4	4	2	3	4	5	5	5	5	3	4	4	4	2	4	4	4	4
3	3	2	3	3	5	5	3	3	4	3	3	3	2	3	3	3	3
5	4	2	5	5	5	5	4	4	3	4	4	5	3	4	4	4	4
5	4	5	4	5	4	3	4	4	2	4	5	5	2	4	5	4	4
5	4	1	5	4	5	5	4	4	5	5	4	5	2	4	4	5	4
4	4	2	4	3	4	5	5	4	3	5	5	5	3	5	4	4	4
4	4	2	3	4	4	5	4	4	5	4	4	4	2	4	3	4	4
4	4	2	3	4	4	5	4	4	4	5	4	4	2	5	4	4	4
4	4	2	4	4	5	5	5	4	5	5	4	5	2	5	4	5	4
4	4	2	4	4	5	5	4	4	5	5	4	3	2	4	4	5	4
4	4	4	4	5	4	5	4	4	3	4	4	5	2	4	4	4	4
4	4	2	5	4	5	5	4	4	4	5	4	4	2	4	4	4	4
5	5	2	5	5	5	5	5	5	4	5	5	5	2	5	3	4	5
4	4	2	3	3	5	5	4	4	4	4	4	4	2	4	3	4	4
4	5	2	5	4	5	5	4	5	4	5	4	4	2	4	4	4	4
3	4	3	4	4	4	4	3	4	4	4	4	4	2	4	3	4	4
5	4	1	4	5	5	5	5	4	4	4	4	4	1	4	4	4	4
4	4	3	4	4	5	5	4	4	5	4	4	3	2	4	4	3	4
3	3	2	3	3	4	5	3	3	4	3	3	3	1	3	3	3	3
2	3	4	4	2	3	4	3	2	3	4	1	1	2	3	3	3	4
5	5	2	5	4	5	5	5	5	4	5	5	5	2	5	5	5	0
4	4	1	4	4	4	4	4	4	4	4	4	4	2	4	4	4	4
5	5	4	5	5	3	4	5	5	5	5	5	5	3	5	5	5	5
1	1	2	1	1	3	3	1	1	2	1	1	1	3	1	1	1	1
5	5	2	5	4	4	4	4	4	4	4	5	2	1	4	4	4	4
5	4	2	5	4	4	4	5	5	4	5	5	5	2	5	5	5	5
3	3	3	3	3	4	5	3	3	5	3	3	3	1	3	3	3	3
4	4	2	4	4	3	5	4	4	4	4	4	4	5	4	4	4	4
5	4	1	4	3	4	5	4	4	4	4	3	5	1	4	4	3	4
5	5	3	5	5	5	5	5	5	3	5	5	5	2	5	5	5	5
3	3	2	3	3	5	5	3	3	4	3	3	3	3	3	3	3	3
4	4	2	3	5	5	5	4	4	2	5	4	5	2	5	4	3	4
5	5	2	5	5	5	5	5	5	4	5	5	5	2	5	5	4	5
4	4	2	3	5	5	5	5	5	2	4	4	5	1	4	4	4	4
4	4	4	5	4	4	4	5	4	5	3	4	5	3	5	4	4	4
4	4	3	4	4	4	5	4	5	4	5	4	5	2	5	4	4	4
5	5	2	5	5	5	5	5	5	4	5	5	5	1	5	5	5	5
4	4	2	4	4	5	5	4	4	5	4	4	4	2	4	4	4	4
5	5	2	4	5	3	5	5	5	5	5	5	5	2	4	5	4	5
4	4	3	4	4	4	5	4	4	5	4	4	4	2	4	4	4	4
4	4	2	4	4	5	5	3	4	5	4	4	4	1	4	3	4	4
4	3	2	4	4	5	5	4	4	5	4	3	4	2	4	2	4	4
4	4	1	4	2	5	5	5	4	4	5	5	5	1	5	4	4	4
3	3	2	2	3	4	5	4	4	4	4	4	3	2	4	3	4	4
4	4	3	4	4	5	4	4	4	5	5	4	4	2	4	4	5	4
5	5	3	5	5	3	4	5	4	3	5	4	0	3	5	5	5	5
3	3	2	3	3	5	5	3	3	4	3	3	3	2	3	3	3	3
4	4	2	3	4	4	5	4	3	4	4	4	4	3	4	3	4	4
3	3	2	3	4	4	5	3	3	3	4	3	4	2	3	3	3	3
4	4	1	2	5	5	5	3	5	3	4	3	5	1	4	1	3	4
3	4	3	4	4	2	2	4	4	4	4	3	4	3	4	3	4	4
3	3	2	3	3	4	5	3	3	4	3	3	3	2	3	3	3	3
5	4	3	5	4	4	4	5	5	4	5	5	5	3	4	4	5	5
5	5	2	4	4	5	5	5	5	4	5	5	5	2	4	5	5	5
5	4	4	4	4	5	5	4	4	4	5	4	5	2	4	4	4	4
5	5	3	4	5	5	5	5	5	5	5	5	5	3	5	5	5	5
5	4	1	4	5	5	5	5	5	5	5	4	5	2	4	3	3	4
4	4	5	3	3	5	5	3	3	3	4	3	3	1	4	4	3	3
4	4	2	5	4	5	5	5	4	4	4	4	4	2	4	4	4	5
4	4	1	4	4	4	5	4	4	4	4	4	4	1	4	5	5	4
5	4	2	4	4	5	5	5	5	3	5	5	5	2	5	5	5	5
5	4	3	5	5	5	5	5	4	3	3	4	5	2	4	5	4	4
4	4	3	4	1	4	5	4	4	5	4	4	4	2	4	4	4	4
4	4	4	4	4	4	4	4	4	3	4	4	4	2	4	4	4	4
4	3	2	5	4	5	5	4	4	4	4	4	3	2	4	4	4	4
5	5	2	5	5	4	4	4	5	5	4	5	2	2	4	5	4	5
3	3	1	3	3	5	5	3	3	5	3	3	3	2	3	3	3	3
4	4	3	4	4	5	5	4	4	4	4	4	4	2	4	3	4	4
5	5	4	4	5	4	3	5	5	4	5	5	5	3	4	5	4	5
5	4	1	4	5	2	5	5	5	3	4	4	5	1	5	5	5	4
5	5	2	5	5	4	5	1	5	3	5	4	5	3	5	5	5	5
5	4	1	5	4	4	5	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 time4 seconds
R Server'Gwilym Jenkins' @ 72.249.127.135

\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 & 4 seconds \tabularnewline
R Server & 'Gwilym Jenkins' @ 72.249.127.135 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=115177&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]4 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Gwilym Jenkins' @ 72.249.127.135[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=115177&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=115177&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 time4 seconds
R Server'Gwilym Jenkins' @ 72.249.127.135







Cronbach Alpha and Related Statistics
ItemsCronbach AlphaStd. AlphaG6(smc)Average R
All itmes0.86270.87360.91340.2774
Q32_1 excluded0.84310.85560.8990.2584
Q32_2 excluded0.84520.8560.90.2591
Q32_3 excluded0.87520.88240.91550.3063
Q32_4 excluded0.84950.86180.90470.2683
Q32_5 excluded0.85440.86620.90770.2759
Q32_6 excluded0.86990.88210.91460.3055
Q32_7 excluded0.86640.88020.91210.3018
Q32_8 excluded0.85670.86830.90980.2795
Q32_9 excluded0.84540.85640.89810.2597
Q32_10 excluded0.86920.87910.91630.2995
Q32_11 excluded0.84760.85860.90330.2632
Q32_12 excluded0.84730.860.90350.2655
Q32_13 excluded0.85570.86720.90950.2775
Q32_14 excluded0.87420.88230.91580.3061
Q32_15 excluded0.84810.86010.90310.2656
Q32_16 excluded0.8510.86310.90510.2706
Q32_17 excluded0.84630.85710.90090.2608
Q32_18 excluded0.85080.86320.90720.2706

\begin{tabular}{lllllllll}
\hline
Cronbach Alpha and Related Statistics \tabularnewline
Items & Cronbach Alpha & Std. Alpha & G6(smc) & Average R \tabularnewline
All itmes & 0.8627 & 0.8736 & 0.9134 & 0.2774 \tabularnewline
Q32_1 excluded & 0.8431 & 0.8556 & 0.899 & 0.2584 \tabularnewline
Q32_2 excluded & 0.8452 & 0.856 & 0.9 & 0.2591 \tabularnewline
Q32_3 excluded & 0.8752 & 0.8824 & 0.9155 & 0.3063 \tabularnewline
Q32_4 excluded & 0.8495 & 0.8618 & 0.9047 & 0.2683 \tabularnewline
Q32_5 excluded & 0.8544 & 0.8662 & 0.9077 & 0.2759 \tabularnewline
Q32_6 excluded & 0.8699 & 0.8821 & 0.9146 & 0.3055 \tabularnewline
Q32_7 excluded & 0.8664 & 0.8802 & 0.9121 & 0.3018 \tabularnewline
Q32_8 excluded & 0.8567 & 0.8683 & 0.9098 & 0.2795 \tabularnewline
Q32_9 excluded & 0.8454 & 0.8564 & 0.8981 & 0.2597 \tabularnewline
Q32_10 excluded & 0.8692 & 0.8791 & 0.9163 & 0.2995 \tabularnewline
Q32_11 excluded & 0.8476 & 0.8586 & 0.9033 & 0.2632 \tabularnewline
Q32_12 excluded & 0.8473 & 0.86 & 0.9035 & 0.2655 \tabularnewline
Q32_13 excluded & 0.8557 & 0.8672 & 0.9095 & 0.2775 \tabularnewline
Q32_14 excluded & 0.8742 & 0.8823 & 0.9158 & 0.3061 \tabularnewline
Q32_15 excluded & 0.8481 & 0.8601 & 0.9031 & 0.2656 \tabularnewline
Q32_16 excluded & 0.851 & 0.8631 & 0.9051 & 0.2706 \tabularnewline
Q32_17 excluded & 0.8463 & 0.8571 & 0.9009 & 0.2608 \tabularnewline
Q32_18 excluded & 0.8508 & 0.8632 & 0.9072 & 0.2706 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=115177&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.8627[/C][C]0.8736[/C][C]0.9134[/C][C]0.2774[/C][/ROW]
[ROW][C]Q32_1 excluded[/C][C]0.8431[/C][C]0.8556[/C][C]0.899[/C][C]0.2584[/C][/ROW]
[ROW][C]Q32_2 excluded[/C][C]0.8452[/C][C]0.856[/C][C]0.9[/C][C]0.2591[/C][/ROW]
[ROW][C]Q32_3 excluded[/C][C]0.8752[/C][C]0.8824[/C][C]0.9155[/C][C]0.3063[/C][/ROW]
[ROW][C]Q32_4 excluded[/C][C]0.8495[/C][C]0.8618[/C][C]0.9047[/C][C]0.2683[/C][/ROW]
[ROW][C]Q32_5 excluded[/C][C]0.8544[/C][C]0.8662[/C][C]0.9077[/C][C]0.2759[/C][/ROW]
[ROW][C]Q32_6 excluded[/C][C]0.8699[/C][C]0.8821[/C][C]0.9146[/C][C]0.3055[/C][/ROW]
[ROW][C]Q32_7 excluded[/C][C]0.8664[/C][C]0.8802[/C][C]0.9121[/C][C]0.3018[/C][/ROW]
[ROW][C]Q32_8 excluded[/C][C]0.8567[/C][C]0.8683[/C][C]0.9098[/C][C]0.2795[/C][/ROW]
[ROW][C]Q32_9 excluded[/C][C]0.8454[/C][C]0.8564[/C][C]0.8981[/C][C]0.2597[/C][/ROW]
[ROW][C]Q32_10 excluded[/C][C]0.8692[/C][C]0.8791[/C][C]0.9163[/C][C]0.2995[/C][/ROW]
[ROW][C]Q32_11 excluded[/C][C]0.8476[/C][C]0.8586[/C][C]0.9033[/C][C]0.2632[/C][/ROW]
[ROW][C]Q32_12 excluded[/C][C]0.8473[/C][C]0.86[/C][C]0.9035[/C][C]0.2655[/C][/ROW]
[ROW][C]Q32_13 excluded[/C][C]0.8557[/C][C]0.8672[/C][C]0.9095[/C][C]0.2775[/C][/ROW]
[ROW][C]Q32_14 excluded[/C][C]0.8742[/C][C]0.8823[/C][C]0.9158[/C][C]0.3061[/C][/ROW]
[ROW][C]Q32_15 excluded[/C][C]0.8481[/C][C]0.8601[/C][C]0.9031[/C][C]0.2656[/C][/ROW]
[ROW][C]Q32_16 excluded[/C][C]0.851[/C][C]0.8631[/C][C]0.9051[/C][C]0.2706[/C][/ROW]
[ROW][C]Q32_17 excluded[/C][C]0.8463[/C][C]0.8571[/C][C]0.9009[/C][C]0.2608[/C][/ROW]
[ROW][C]Q32_18 excluded[/C][C]0.8508[/C][C]0.8632[/C][C]0.9072[/C][C]0.2706[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=115177&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=115177&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.86270.87360.91340.2774
Q32_1 excluded0.84310.85560.8990.2584
Q32_2 excluded0.84520.8560.90.2591
Q32_3 excluded0.87520.88240.91550.3063
Q32_4 excluded0.84950.86180.90470.2683
Q32_5 excluded0.85440.86620.90770.2759
Q32_6 excluded0.86990.88210.91460.3055
Q32_7 excluded0.86640.88020.91210.3018
Q32_8 excluded0.85670.86830.90980.2795
Q32_9 excluded0.84540.85640.89810.2597
Q32_10 excluded0.86920.87910.91630.2995
Q32_11 excluded0.84760.85860.90330.2632
Q32_12 excluded0.84730.860.90350.2655
Q32_13 excluded0.85570.86720.90950.2775
Q32_14 excluded0.87420.88230.91580.3061
Q32_15 excluded0.84810.86010.90310.2656
Q32_16 excluded0.8510.86310.90510.2706
Q32_17 excluded0.84630.85710.90090.2608
Q32_18 excluded0.85080.86320.90720.2706



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')