Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*The author of this computation has been verified*

R Software Module

rwasp_cronbach.wasp

Title produced by software

Cronbach Alpha

Date of computation

Thu, 30 Nov 2017 09:30:20 +0100

Cite this page as follows

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2017/Nov/30/t1512030625n3s98i0s2j9sa21.htm/, Retrieved Sat, 18 May 2024 15:18:12 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=308359, Retrieved Sat, 18 May 2024 15:18:12 +0000

QR Codes:

Paste this QR Code to cite your computation.

Original text written by user:

IsPrivate?

No (this computation is public)

User-defined keywords

Estimated Impact

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)

-       [Cronbach Alpha] [] [2017-11-30 08:30:20] [1fb90e819e5b19aec9e872ea972cd63e] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

7	7	10	17	14
8	8	11	19	21
8	10	11	18	20
10	10	13	17	20
8	5	7	17	20
9	7	12	19	18
8	8	11	19	18
10	9	12	12	17
7	8	12	15	15
10	8	12	16	18
8	8	11	16	16
8	10	12	14	17
6	10	10	15	19
7	8	12	16	21
9	10	10	14	15
9	9	15	18	21
8	7	12	15	16
8	8	15	18	18
10	10	13	19	18
7	4	12	15	17
7	9	12	17	18
7	5	9	9	16
6	4	12	18	15
9	9	8	17	15
7	6	10	15	19
8	8	11	13	14
10	10	14	17	19
9	9	14	14	19
8	8	11	15	15
8	7	11	14	17
10	10	11	17	21
8	6	10	14	13
4	9	8	13	12
6	5	12	19	15
7	4	10	15	19
7	8	12	14	19
3	2	8	11	14
8	10	10	16	18
8	5	9	13	11
6	8	12	15	17
10	8	15	17	18
8	8	13	15	13
4	7	11	12	12
8	10	12	15	17
7	10	12	15	20
6	7	9	8	16
9	10	14	16	22
10	10	10	12	16
9	8	14	13	23
7	7	12	16	20
10	8	15	16	23
7	6	9	8	13
10	10	14	14	18
9	9	10	15	18
7	9	11	16	17
10	7	11	16	17
8	8	12	17	18
8	6	11	18	21
6	7	10	9	13
9	9	13	19	19
7	7	8	14	16
8	7	9	14	17
8	7	9	15	18
9	10	15	19	18
5	4	8	12	12
9	10	13	17	19
6	3	10	16	16
8	8	13	17	20
10	10	15	15	21
7	8	10	11	18
5	6	9	8	13
4	6	12	16	17
9	10	12	20	20
10	10	12	20	21
8	7	12	13	19
6	8	10	11	15
6	7	9	15	14
9	9	12	15	15
3	2	12	14	16
7	10	12	16	19
9	10	8	15	17
7	7	11	15	17
8	8	10	16	15
9	8	15	19	19
9	10	13	20	21
8	8	11	14	19
9	8	12	16	18
6	7	11	14	18
7	8	11	11	15
8	8	14	16	19
7	10	14	16	19
9	9	14	15	18
9	9	12	16	20
5	4	10	12	18
6	5	12	13	12
8	10	11	11	15
10	9	15	20	17
5	6	9	11	15
8	8	11	14	17
8	8	14	16	20
10	9	10	15	11
7	8	12	13	14
9	4	10	15	14
8	5	12	13	12
8	10	13	17	19
10	10	13	18	22
9	9	12	14	16
9	9	12	13	15
6	6	9	12	15
8	7	10	17	18
5	4	7	6	12
3	6	12	9	17
6	4	12	15	10
6	4	12	15	10
10	10	13	17	18
9	6	12	19	16
9	9	15	20	22
5	7	8	10	12
6	4	7	9	10
7	8	9	15	20
8	8	11	16	20
9	8	11	16	19
3	7	6	9	10
5	6	6	10	13
5	5	8	9	15
9	5	11	17	19
10	7	12	17	17
7	4	13	19	15
8	8	9	10	12
6	7	10	12	14
5	6	9	9	13
8	8	10	11	15
7	5	12	17	20
5	3	7	9	12
6	5	13	14	16
10	10	10	19	15
10	7	10	17	17
6	4	11	13	15
4	2	8	11	12
8	6	12	14	17
5	3	4	7	11
7	8	13	17	16
10	9	13	16	16
8	5	10	12	15
7	6	12	10	17
2	2	6	10	7
7	6	8	8	14
9	10	13	18	21
8	8	12	15	20
5	10	10	18	15
8	8	10	14	13
6	8	10	16	20
7	6	8	11	15
10	9	11	16	16
8	9	12	17	19
10	9	12	20	16
9	8	12	14	19
8	8	11	16	17
10	10	12	17	19
4	3	10	11	14
6	6	12	13	16
9	9	13	11	16
4	3	10	8	14
6	4	7	9	11
7	5	11	9	17
9	9	10	12	20
8	8	12	15	20
6	5	11	18	17
4	4	10	10	13
8	5	12	15	20
8	7	11	16	17
9	7	14	18	16
6	8	12	15	19
5	8	12	17	20
5	6	10	17	17
8	7	11	14	14
8	9	12	17	20
9	9	12	13	19
7	6	12	16	18
9	9	8	12	17
8	9	11	17	17
6	8	8	10	10
7	6	6	9	12
8	6	13	15	19
8	10	11	14	19
7	8	9	16	21
7	10	11	17	21
8	8	14	18	17
8	7	9	14	19
9	7	13	17	21
9	8	12	14	15
9	8	12	15	14
8	7	11	14	15
2	2	9	10	13
8	5	7	9	14
8	7	10	12	14
8	5	12	13	19
7	5	11	14	17
10	10	11	18	19
8	8	11	15	18
10	7	13	14	21
5	6	11	10	12
4	6	8	9	15
10	5	11	17	19
8	7	10	12	16
7	8	12	16	19
5	7	8	11	16
7	8	13	13	18
9	9	10	12	18
8	5	11	15	15
8	5	11	15	15
2	5	8	10	11
9	10	13	16	18
8	5	12	11	13
5	5	9	14	9
7	8	15	17	21
8	10	12	16	19
7	7	14	16	13
5	2	7	11	15
10	6	11	16	18
6	3	10	13	16
6	6	7	7	10
5	4	11	13	12
7	4	11	14	18
8	8	10	14	17
8	7	9	9	15
4	5	11	15	16
9	9	12	16	19
4	5	10	11	15
10	6	13	20	24
6	5	10	14	15
6	2	10	9	14
8	8	12	16	16
8	7	12	13	16
8	9	12	15	20
8	9	12	15	20
8	9	12	15	20
8	10	12	15	20
7	6	7	14	14
7	9	14	15	22
8	9	9	13	16
10	6	8	12	9
10	10	13	17	14
3	5	6	8	11
8	9	12	17	23
2	4	8	10	10
4	2	6	9	10
4	3	6	9	8
9	9	12	15	21
10	10	10	14	18
6	6	9	12	15
10	9	11	16	20
10	8	14	19	17
3	2	6	6	5
9	6	9	11	14
9	9	11	16	19
6	6	9	12	15
5	4	8	12	12
4	3	6	8	10
4	3	10	11	11
6	4	6	8	15
6	6	9	12	15
8	8	12	16	20
8	6	12	18	20
5	7	13	16	20
7	8	12	15	19
6	3	12	20	16
10	10	10	10	21
8	8	9	15	22
8	6	12	14	17
9	10	14	14	21
5	8	6	8	19
10	10	13	19	23
8	7	12	17	21
9	10	13	18	22
8	6	6	10	11
7	7	12	15	20
10	9	10	16	18
10	6	9	12	16
9	7	12	13	18
4	6	7	10	13
4	4	10	14	17
8	6	11	15	20
9	8	15	20	20
10	9	10	9	15
8	8	12	12	18
5	6	10	13	15
10	6	12	16	19
8	10	11	12	19
7	8	11	14	19
8	8	12	15	20
8	7	15	19	20
9	4	12	16	16
8	9	11	16	18
6	8	9	14	17
8	10	11	14	18
8	8	11	14	13
5	6	9	13	20
9	7	15	18	21
8	8	12	15	17
8	5	9	15	19
8	10	12	15	20
6	2	12	13	15
6	6	9	14	15
9	7	9	15	19
8	5	11	14	18
9	8	12	19	22
10	7	12	16	20
8	7	12	16	18
8	10	12	12	14
7	7	6	10	15
7	6	11	11	17
10	10	12	13	16
8	6	9	14	17
7	5	11	11	15
10	8	9	11	17
7	8	10	16	18
7	5	10	9	16
9	8	9	16	18
9	10	12	19	22
8	7	11	13	16
6	7	9	15	16
8	7	9	14	20
9	7	12	15	18
2	2	6	11	16
6	4	10	14	16
8	6	12	15	20
8	7	11	17	21
7	9	14	16	18
8	9	8	13	15
6	4	9	15	18
10	9	10	14	18
10	9	10	15	20
10	8	10	14	18
8	7	11	12	16
8	9	10	12	19
7	7	12	15	20
10	6	14	17	22
5	7	10	13	18
3	2	8	5	8
2	3	8	7	13
3	4	7	10	13
4	5	11	15	18
2	2	6	9	12
6	6	9	9	16
8	8	12	15	21
8	5	12	14	20
5	4	12	11	18
10	10	9	18	22
9	10	15	20	23
8	10	15	20	23
9	9	13	16	21
8	5	9	15	16
5	5	12	14	14
7	7	9	13	18
9	10	15	18	22
8	9	11	14	20
4	8	11	12	18
7	8	6	9	12
8	8	14	19	17
7	8	11	13	15
7	8	8	12	18
9	7	10	14	18
6	6	10	6	15
7	8	9	14	16
4	2	8	11	15
6	5	9	11	16
10	4	10	14	19
9	9	11	12	19
10	10	14	19	23
8	6	12	13	20
4	4	9	14	18
8	10	13	17	21
5	6	8	12	19
8	7	12	16	18
9	7	14	15	19
8	8	9	15	17
4	6	10	15	21
8	5	12	16	19
10	6	12	15	24
6	7	9	12	12
7	6	9	13	15
10	9	12	14	18
9	9	15	17	19
8	7	12	14	22
3	6	11	14	19
8	7	8	14	16
7	7	11	15	19
7	8	11	11	18
8	7	10	11	18
8	8	12	16	19
7	7	9	12	21
7	4	11	12	19
9	10	15	19	22
9	8	14	18	23
9	8	6	16	17
4	2	9	16	18
6	6	9	13	19
6	4	8	11	15
6	4	7	10	14
8	9	10	14	18
3	2	6	14	17
8	6	9	14	19
8	7	9	16	16
6	4	7	10	14
10	10	11	16	20
2	3	9	7	16
9	7	12	16	18
6	4	9	15	16
6	8	10	17	21
5	4	11	11	16
4	5	7	11	14
7	6	12	10	16
5	5	8	13	19
8	9	13	14	19
6	6	11	13	19
9	8	11	13	18
6	4	12	12	16
4	4	11	10	14
7	8	12	15	19
2	4	3	6	11
8	10	10	15	18
9	8	13	15	18
6	5	10	11	16
5	3	6	14	20
7	7	11	14	18
8	6	12	16	20
4	5	9	12	16
9	5	10	15	18
9	9	15	20	19
9	2	9	12	19
7	7	6	9	15
5	7	9	13	17
7	5	15	15	21
9	9	15	19	24
8	4	9	11	16
6	5	11	11	13
9	9	9	17	21
8	7	11	15	16
7	6	10	14	17
7	8	9	15	17
7	7	6	11	18
8	6	12	12	18
10	8	13	15	23
6	6	12	16	20
6	7	12	16	20

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	1 seconds
R Server	Big 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 time1 seconds \tabularnewline
R ServerBig Analytics Cloud Computing Center \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=308359&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]

1 seconds[/C][/ROW] [ROW]

R Server[/C]

Big Analytics Cloud Computing Center[/C][/ROW] [/TABLE] Source: https://freestatistics.org/blog/index.php?pk=308359&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=308359&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 Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	1 seconds
R Server	Big Analytics Cloud Computing Center

Cronbach Alpha and Related Statistics
Items	Cronbach Alpha	Std. Alpha	G6(smc)	Average R
All itmes	0.8486	0.8602	0.8437	0.5517
Int_To_Use excluded	0.8223	0.83	0.793	0.5497
Rel_Adv excluded	0.8292	0.8418	0.8039	0.5708
Perc_Use excluded	0.812	0.8304	0.7993	0.5504
Ease_Of_Use excluded	0.8015	0.8203	0.7846	0.533
Info_Qual excluded	0.8198	0.8328	0.8062	0.5546

\begin{tabular}{lllllllll}
\hline
Cronbach Alpha and Related Statistics \tabularnewline
Items & Cronbach Alpha & Std. Alpha & G6(smc) & Average R \tabularnewline
All itmes & 0.8486 & 0.8602 & 0.8437 & 0.5517 \tabularnewline
Int_To_Use excluded & 0.8223 & 0.83 & 0.793 & 0.5497 \tabularnewline
Rel_Adv excluded & 0.8292 & 0.8418 & 0.8039 & 0.5708 \tabularnewline
Perc_Use excluded & 0.812 & 0.8304 & 0.7993 & 0.5504 \tabularnewline
Ease_Of_Use excluded & 0.8015 & 0.8203 & 0.7846 & 0.533 \tabularnewline
Info_Qual excluded & 0.8198 & 0.8328 & 0.8062 & 0.5546 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=308359&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.8486[/C][C]0.8602[/C][C]0.8437[/C][C]0.5517[/C][/ROW]
[ROW][C]Int_To_Use excluded[/C][C]0.8223[/C][C]0.83[/C][C]0.793[/C][C]0.5497[/C][/ROW]
[ROW][C]Rel_Adv excluded[/C][C]0.8292[/C][C]0.8418[/C][C]0.8039[/C][C]0.5708[/C][/ROW]
[ROW][C]Perc_Use excluded[/C][C]0.812[/C][C]0.8304[/C][C]0.7993[/C][C]0.5504[/C][/ROW]
[ROW][C]Ease_Of_Use excluded[/C][C]0.8015[/C][C]0.8203[/C][C]0.7846[/C][C]0.533[/C][/ROW]
[ROW][C]Info_Qual excluded[/C][C]0.8198[/C][C]0.8328[/C][C]0.8062[/C][C]0.5546[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=308359&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=308359&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
Items	Cronbach Alpha	Std. Alpha	G6(smc)	Average R
All itmes	0.8486	0.8602	0.8437	0.5517
Int_To_Use excluded	0.8223	0.83	0.793	0.5497
Rel_Adv excluded	0.8292	0.8418	0.8039	0.5708
Perc_Use excluded	0.812	0.8304	0.7993	0.5504
Ease_Of_Use excluded	0.8015	0.8203	0.7846	0.533
Info_Qual excluded	0.8198	0.8328	0.8062	0.5546

Parameters (Session):

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

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code