FreeStatistics.org

Free Statistics

of Irreproducible Research!

Description of Statistical Computation

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_cronbach.wasp
Title produced by softwareCronbach Alpha
Date of computationWed, 13 Dec 2017 14:31:11 +0100
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2017/Dec/13/t15131719063dxa5orpcstnxs3.htm/, Retrieved Wed, 15 May 2024 23:53:37 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=309299, Retrieved Wed, 15 May 2024 23:53:37 +0000
QR Codes:

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

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Cronbach Alpha] [] [2017-12-13 13:31:11] [30e08ccf92bdf95f8dcbf6f321363364] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
10	7	14
11	8	21
11	8	20
13	10	20
7	8	20
12	9	18
11	8	18
12	10	17
12	7	15
12	10	18
11	8	16
12	8	17
10	6	19
12	7	21
10	9	15
15	9	21
12	8	16
15	8	18
13	10	18
12	7	17
12	7	18
9	7	16
12	6	15
8	9	15
10	7	19
11	8	14
14	10	19
14	9	19
11	8	15
11	8	17
11	10	21
10	8	13
8	4	12
12	6	15
10	7	19
12	7	19
8	3	14
10	8	18
9	8	11
12	6	17
15	10	18
13	8	13
11	4	12
12	8	17
12	7	20
9	6	16
14	9	22
10	10	16
14	9	23
12	7	20
15	10	23
9	7	13
14	10	18
10	9	18
11	7	17
11	10	17
12	8	18
11	8	21
10	6	13
13	9	19
8	7	16
9	8	17
9	8	18
15	9	18
8	5	12
13	9	19
10	6	16
13	8	20
15	10	21
10	7	18
9	5	13
12	4	17
12	9	20
12	10	21
12	8	19
10	6	15
9	6	14
12	9	15
12	3	16
12	7	19
8	9	17
11	7	17
10	8	15
15	9	19
13	9	21
11	8	19
12	9	18
11	6	18
11	7	15
14	8	19
14	7	19
14	9	18
12	9	20
10	5	18
12	6	12
11	8	15
15	10	17
9	5	15
11	8	17
14	8	20
10	10	11
12	7	14
10	9	14
12	8	12
13	8	19
13	10	22
12	9	16
12	9	15
9	6	15
10	8	18
7	5	12
12	3	17
12	6	10
12	6	10
13	10	18
12	9	16
15	9	22
8	5	12
7	6	10
9	7	20
11	8	20
11	9	19
6	3	10
6	5	13
8	5	15
11	9	19
12	10	17
13	7	15
9	8	12
10	6	14
9	5	13
10	8	15
12	7	20
7	5	12
13	6	16
10	10	15
10	10	17
11	6	15
8	4	12
12	8	17
4	5	11
13	7	16
13	10	16
10	8	15
12	7	17
6	2	7
8	7	14
13	9	21
12	8	20
10	5	15
10	8	13
10	6	20
8	7	15
11	10	16
12	8	19
12	10	16
12	9	19
11	8	17
12	10	19
10	4	14
12	6	16
13	9	16
10	4	14
7	6	11
11	7	17
10	9	20
12	8	20
11	6	17
10	4	13
12	8	20
11	8	17
14	9	16
12	6	19
12	5	20
10	5	17
11	8	14
12	8	20
12	9	19
12	7	18
8	9	17
11	8	17
8	6	10
6	7	12
13	8	19
11	8	19
9	7	21
11	7	21
14	8	17
9	8	19
13	9	21
12	9	15
12	9	14
11	8	15
9	2	13
7	8	14
10	8	14
12	8	19
11	7	17
11	10	19
11	8	18
13	10	21
11	5	12
8	4	15
11	10	19
10	8	16
12	7	19
8	5	16
13	7	18
10	9	18
11	8	15
11	8	15
8	2	11
13	9	18
12	8	13
9	5	9
15	7	21
12	8	19
14	7	13
7	5	15
11	10	18
10	6	16
7	6	10
11	5	12
11	7	18
10	8	17
9	8	15
11	4	16
12	9	19
10	4	15
13	10	24
10	6	15
10	6	14
12	8	16
12	8	16
12	8	20
12	8	20
12	8	20
12	8	20
7	7	14
14	7	22
9	8	16
8	10	9
13	10	14
6	3	11
12	8	23
8	2	10
6	4	10
6	4	8
12	9	21
10	10	18
9	6	15
11	10	20
14	10	17
6	3	5
9	9	14
11	9	19
9	6	15
8	5	12
6	4	10
10	4	11
6	6	15
9	6	15
12	8	20
12	8	20
13	5	20
12	7	19
12	6	16
10	10	21
9	8	22
12	8	17
14	9	21
6	5	19
13	10	23
12	8	21
13	9	22
6	8	11
12	7	20
10	10	18
9	10	16
12	9	18
7	4	13
10	4	17
11	8	20
15	9	20
10	10	15
12	8	18
10	5	15
12	10	19
11	8	19
11	7	19
12	8	20
15	8	20
12	9	16
11	8	18
9	6	17
11	8	18
11	8	13
9	5	20
15	9	21
12	8	17
9	8	19
12	8	20
12	6	15
9	6	15
9	9	19
11	8	18
12	9	22
12	10	20
12	8	18
12	8	14
6	7	15
11	7	17
12	10	16
9	8	17
11	7	15
9	10	17
10	7	18
10	7	16
9	9	18
12	9	22
11	8	16
9	6	16
9	8	20
12	9	18
6	2	16
10	6	16
12	8	20
11	8	21
14	7	18
8	8	15
9	6	18
10	10	18
10	10	20
10	10	18
11	8	16
10	8	19
12	7	20
14	10	22
10	5	18
8	3	8
8	2	13
7	3	13
11	4	18
6	2	12
9	6	16
12	8	21
12	8	20
12	5	18
9	10	22
15	9	23
15	8	23
13	9	21
9	8	16
12	5	14
9	7	18
15	9	22
11	8	20
11	4	18
6	7	12
14	8	17
11	7	15
8	7	18
10	9	18
10	6	15
9	7	16
8	4	15
9	6	16
10	10	19
11	9	19
14	10	23
12	8	20
9	4	18
13	8	21
8	5	19
12	8	18
14	9	19
9	8	17
10	4	21
12	8	19
12	10	24
9	6	12
9	7	15
12	10	18
15	9	19
12	8	22
11	3	19
8	8	16
11	7	19
11	7	18
10	8	18
12	8	19
9	7	21
11	7	19
15	9	22
14	9	23
6	9	17
9	4	18
9	6	19
8	6	15
7	6	14
10	8	18
6	3	17
9	8	19
9	8	16
7	6	14
11	10	20
9	2	16
12	9	18
9	6	16
10	6	21
11	5	16
7	4	14
12	7	16
8	5	19
13	8	19
11	6	19
11	9	18
12	6	16
11	4	14
12	7	19
3	2	11
10	8	18
13	9	18
10	6	16
6	5	20
11	7	18
12	8	20
9	4	16
10	9	18
15	9	19
9	9	19
6	7	15
9	5	17
15	7	21
15	9	24
9	8	16
11	6	13
9	9	21
11	8	16
10	7	17
9	7	17
6	7	18
12	8	18
13	10	23
12	6	20
12	6	20

Tables (Output of Computation)





Summary of computational transaction
Raw Input view raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R ServerBig Analytics Cloud Computing Center

\begin{tabular}{lllllllll}
\hline
Summary of computational transaction \tabularnewline
Raw Input view raw input (R code)  \tabularnewline
Raw Outputview raw output of R engine  \tabularnewline
Computing time2 seconds \tabularnewline
R ServerBig Analytics Cloud Computing Center \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=309299&T=0

[TABLE]
[ROW]
Summary of computational transaction[/C][/ROW] [ROW]Raw Input[/C] view raw input (R code) [/C][/ROW] [ROW]Raw Output[/C]view raw output of R engine [/C][/ROW] [ROW]Computing time[/C]2 seconds[/C][/ROW] [ROW]R Server[/C]Big Analytics Cloud Computing Center[/C][/ROW] [/TABLE] Source: https://freestatistics.org/blog/index.php?pk=309299&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=309299&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 computational transaction
Raw Input view raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R ServerBig Analytics Cloud Computing Center






Cronbach Alpha and Related Statistics
ItemsCronbach AlphaStd. AlphaG6(smc)Average R
All itmes0.74790.77190.69430.5301
Perceived_Usefulness excluded0.62030.67210.50610.5061
Intention_to_Use excluded0.69540.72480.56840.5684
Information_Quality excluded0.67640.68040.51560.5156

\begin{tabular}{lllllllll}
\hline
Cronbach Alpha and Related Statistics \tabularnewline
Items & Cronbach Alpha & Std. Alpha & G6(smc) & Average R \tabularnewline
All itmes & 0.7479 & 0.7719 & 0.6943 & 0.5301 \tabularnewline
Perceived_Usefulness excluded & 0.6203 & 0.6721 & 0.5061 & 0.5061 \tabularnewline
Intention_to_Use excluded & 0.6954 & 0.7248 & 0.5684 & 0.5684 \tabularnewline
Information_Quality excluded & 0.6764 & 0.6804 & 0.5156 & 0.5156 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=309299&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.7479[/C][C]0.7719[/C][C]0.6943[/C][C]0.5301[/C][/ROW]
[ROW][C]Perceived_Usefulness excluded[/C][C]0.6203[/C][C]0.6721[/C][C]0.5061[/C][C]0.5061[/C][/ROW]
[ROW][C]Intention_to_Use excluded[/C][C]0.6954[/C][C]0.7248[/C][C]0.5684[/C][C]0.5684[/C][/ROW]
[ROW][C]Information_Quality excluded[/C][C]0.6764[/C][C]0.6804[/C][C]0.5156[/C][C]0.5156[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=309299&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=309299&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:

Cronbach Alpha and Related Statistics
ItemsCronbach AlphaStd. AlphaG6(smc)Average R
All itmes0.74790.77190.69430.5301
Perceived_Usefulness excluded0.62030.67210.50610.5061
Intention_to_Use excluded0.69540.72480.56840.5684
Information_Quality excluded0.67640.68040.51560.5156


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = TRUE1pearsonpearson08888TRUE ; par2 = 2no0000 ; par3 = TRUE512 ;
Parameters (R input):
par1 = TRUE ;
R code (references can be found in the software module):
library(psych)
par1b <- T
if(par1=='FALSE') par1b <- F
z <- t(y)
(r <- alpha(z,check.keys=par1b))
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')