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

Sun, 17 Dec 2017 15:54:05 +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/Dec/17/t1513522659avhe1pladn432n2.htm/, Retrieved Thu, 16 May 2024 01:36:31 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=309993, Retrieved Thu, 16 May 2024 01:36:31 +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] [Dataset 1: Cronba...] [2017-12-17 14:54:05] [90753a48488b87cdd376975a1d76550a] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

7	7	10	17	14	22
8	8	11	19	21	39
8	10	11	18	20	40
10	10	13	17	20	34
8	5	7	17	20	38
9	7	12	19	18	39
8	8	11	19	18	39
10	9	12	12	17	38
7	8	12	15	15	31
10	8	12	16	18	34
8	8	11	16	16	32
8	10	12	14	17	37
6	10	10	15	19	36
7	8	12	16	21	38
9	10	10	14	15	29
9	9	15	18	21	33
8	7	12	15	16	35
8	8	15	18	18	34
10	10	13	19	18	45
7	4	12	15	17	30
7	9	12	17	18	33
7	5	9	9	16	30
6	4	12	18	15	40
9	9	8	17	15	34
7	6	10	15	19	31
8	8	11	13	14	27
10	10	14	17	19	33
9	9	14	14	19	42
8	8	11	15	15	36
8	7	11	14	17	33
10	10	11	17	21	42
8	6	10	14	13	33
4	9	8	13	12	21
6	5	12	19	15	43
7	4	10	15	19	34
7	8	12	14	19	32
3	2	8	11	14	34
8	10	10	16	18	28
8	5	9	13	11	30
6	8	12	15	17	27
10	8	15	17	18	29
8	8	13	15	13	40
4	7	11	12	12	29
8	10	12	15	17	41
7	10	12	15	20	33
6	7	9	8	16	42
9	10	14	16	22	39
10	10	10	12	16	35
9	8	14	13	23	33
7	7	12	16	20	33
10	8	15	16	23	44
7	6	9	8	13	34
10	10	14	14	18	30
9	9	10	15	18	30
7	9	11	16	17	35
10	7	11	16	17	39
8	8	12	17	18	34
8	6	11	18	21	39
6	7	10	9	13	25
9	9	13	19	19	39
7	7	8	14	16	33
8	7	9	14	17	34
8	7	9	15	18	36
9	10	15	19	18	34
5	4	8	12	12	31
9	10	13	17	19	35
6	3	10	16	16	34
8	8	13	17	20	36
10	10	15	15	21	40
7	8	10	11	18	31
5	6	9	8	13	33
4	6	12	16	17	28
9	10	12	20	20	42
10	10	12	20	21	38
8	7	12	13	19	35
6	8	10	11	15	34
6	7	9	15	14	28
9	9	12	15	15	35
3	2	12	14	16	25
7	10	12	16	19	39
9	10	8	15	17	25
7	7	11	15	17	32
8	8	10	16	15	35
9	8	15	19	19	41
9	10	13	20	21	34
8	8	11	14	19	33
9	8	12	16	18	32
6	7	11	14	18	34
7	8	11	11	15	25
8	8	14	16	19	38
7	10	14	16	19	37
9	9	14	15	18	38
9	9	12	16	20	36
5	4	10	12	18	39
6	5	12	13	12	31
8	10	11	11	15	40
10	9	15	20	17	34
5	6	9	11	15	33
8	8	11	14	17	32
8	8	14	16	20	33
10	9	10	15	11	32
7	8	12	13	14	28
9	4	10	15	14	32
8	5	12	13	12	34
8	10	13	17	19	36
10	10	13	18	22	38
9	9	12	14	16	31
9	9	12	13	15	36
6	6	9	12	15	27
8	7	10	17	18	31
5	4	7	6	12	28
3	6	12	9	17	30
6	4	12	15	10	29
6	4	12	15	10	29
10	10	13	17	18	31
9	6	12	19	16	35
9	9	15	20	22	42
5	7	8	10	12	28
6	4	7	9	10	38
7	8	9	15	20	34
8	8	11	16	20	28
9	8	11	16	19	30
3	7	6	9	10	26
5	6	6	10	13	27
5	5	8	9	15	31
9	5	11	17	19	35
10	7	12	17	17	33
7	4	13	19	15	34
8	8	9	10	12	30
6	7	10	12	14	28
5	6	9	9	13	30
8	8	10	11	15	29
7	5	12	17	20	32
5	3	7	9	12	34
6	5	13	14	16	34
10	10	10	19	15	35
10	7	10	17	17	40
6	4	11	13	15	34
4	2	8	11	12	28
8	6	12	14	17	35
5	3	4	7	11	31
7	8	13	17	16	33
10	9	13	16	16	36
8	5	10	12	15	30
7	6	12	10	17	27
2	2	6	10	7	30
7	6	8	8	14	25
9	10	13	18	21	39
8	8	12	15	20	36
5	10	10	18	15	31
8	8	10	14	13	33
6	8	10	16	20	30
7	6	8	11	15	31
10	9	11	16	16	32
8	9	12	17	19	33
10	9	12	20	16	43
9	8	12	14	19	35
8	8	11	16	17	36
10	10	12	17	19	42
4	3	10	11	14	31
6	6	12	13	16	26
9	9	13	11	16	38
4	3	10	8	14	27
6	4	7	9	11	27
7	5	11	9	17	31
9	9	10	12	20	32
8	8	12	15	20	36
6	5	11	18	17	36
4	4	10	10	13	25
8	5	12	15	20	33
8	7	11	16	17	32
9	7	14	18	16	40
6	8	12	15	19	36
5	8	12	17	20	36
5	6	10	17	17	35
8	7	11	14	14	31
8	9	12	17	20	31
9	9	12	13	19	36
7	6	12	16	18	36
9	9	8	12	17	37
8	9	11	17	17	31
6	8	8	10	10	31
7	6	6	9	12	26
8	6	13	15	19	35
8	10	11	14	19	32
7	8	9	16	21	36
7	10	11	17	21	37
8	8	14	18	17	34
8	7	9	14	19	33
9	7	13	17	21	35
9	8	12	14	15	31
9	8	12	15	14	38
8	7	11	14	15	36
2	2	9	10	13	32
8	5	7	9	14	28
8	7	10	12	14	33
8	5	12	13	19	31
7	5	11	14	17	34
10	10	11	18	19	33
8	8	11	15	18	36
10	7	13	14	21	36
5	6	11	10	12	29
4	6	8	9	15	31
10	5	11	17	19	35
8	7	10	12	16	31
7	8	12	16	19	35
5	7	8	11	16	36
7	8	13	13	18	35
9	9	10	12	18	38
8	5	11	15	15	28
8	5	11	15	15	28
2	5	8	10	11	28
9	10	13	16	18	34
8	5	12	11	13	31
5	5	9	14	9	44
7	8	15	17	21	36
8	10	12	16	19	36
7	7	14	16	13	34
5	2	7	11	15	32
10	6	11	16	18	36
6	3	10	13	16	38
6	6	7	7	10	28
5	4	11	13	12	37
7	4	11	14	18	32
8	8	10	14	17	36
8	7	9	9	15	30
4	5	11	15	16	38
9	9	12	16	19	37
4	5	10	11	15	33
10	6	13	20	24	43
6	5	10	14	15	26
6	2	10	9	14	33
8	8	12	16	16	34
8	7	12	13	16	36
8	9	12	15	20	36
8	9	12	15	20	36
8	9	12	15	20	36
8	10	12	15	20	39
7	6	7	14	14	33
7	9	14	15	22	35
8	9	9	13	16	25
10	6	8	12	9	26
10	10	13	17	14	35
3	5	6	8	11	16
8	9	12	17	23	40
2	4	8	10	10	14
4	2	6	9	10	22
4	3	6	9	8	21
9	9	12	15	21	38
10	10	10	14	18	38
6	6	9	12	15	27
10	9	11	16	20	40
10	8	14	19	17	40
3	2	6	6	5	19
9	6	9	11	14	29
9	9	11	16	19	37
6	6	9	12	15	27
5	4	8	12	12	26
4	3	6	8	10	24
4	3	10	11	11	29
6	4	6	8	15	26
6	6	9	12	15	27
8	8	12	16	20	35
8	6	12	18	20	39
5	7	13	16	20	38
7	8	12	15	19	36
6	3	12	20	16	37
10	10	10	10	21	36
8	8	9	15	22	32
8	6	12	14	17	33
9	10	14	14	21	39
5	8	6	8	19	34
10	10	13	19	23	39
8	7	12	17	21	36
9	10	13	18	22	33
8	6	6	10	11	30
7	7	12	15	20	39
10	9	10	16	18	37
10	6	9	12	16	37
9	7	12	13	18	35
4	6	7	10	13	32
4	4	10	14	17	36
8	6	11	15	20	36
9	8	15	20	20	41
10	9	10	9	15	36
8	8	12	12	18	37
5	6	10	13	15	29
10	6	12	16	19	39
8	10	11	12	19	37
7	8	11	14	19	32
8	8	12	15	20	36
8	7	15	19	20	43
9	4	12	16	16	30
8	9	11	16	18	33
6	8	9	14	17	28
8	10	11	14	18	30
8	8	11	14	13	28
5	6	9	13	20	39
9	7	15	18	21	34
8	8	12	15	17	34
8	5	9	15	19	29
8	10	12	15	20	32
6	2	12	13	15	33
6	6	9	14	15	27
9	7	9	15	19	35
8	5	11	14	18	38
9	8	12	19	22	40
10	7	12	16	20	34
8	7	12	16	18	34
8	10	12	12	14	26
7	7	6	10	15	39
7	6	11	11	17	34
10	10	12	13	16	39
8	6	9	14	17	26
7	5	11	11	15	30
10	8	9	11	17	34
7	8	10	16	18	34
7	5	10	9	16	29
9	8	9	16	18	41
9	10	12	19	22	43
8	7	11	13	16	31
6	7	9	15	16	33
8	7	9	14	20	34
9	7	12	15	18	30
2	2	6	11	16	23
6	4	10	14	16	29
8	6	12	15	20	35
8	7	11	17	21	40
7	9	14	16	18	27
8	9	8	13	15	30
6	4	9	15	18	27
10	9	10	14	18	29
10	9	10	15	20	33
10	8	10	14	18	32
8	7	11	12	16	33
8	9	10	12	19	36
7	7	12	15	20	34
10	6	14	17	22	45
5	7	10	13	18	30
3	2	8	5	8	22
2	3	8	7	13	24
3	4	7	10	13	25
4	5	11	15	18	26
2	2	6	9	12	27
6	6	9	9	16	27
8	8	12	15	21	35
8	5	12	14	20	36
5	4	12	11	18	32
10	10	9	18	22	35
9	10	15	20	23	35
8	10	15	20	23	36
9	9	13	16	21	37
8	5	9	15	16	33
5	5	12	14	14	25
7	7	9	13	18	35
9	10	15	18	22	37
8	9	11	14	20	36
4	8	11	12	18	35
7	8	6	9	12	29
8	8	14	19	17	35
7	8	11	13	15	31
7	8	8	12	18	30
9	7	10	14	18	37
6	6	10	6	15	36
7	8	9	14	16	35
4	2	8	11	15	32
6	5	9	11	16	34
10	4	10	14	19	37
9	9	11	12	19	36
10	10	14	19	23	39
8	6	12	13	20	37
4	4	9	14	18	31
8	10	13	17	21	40
5	6	8	12	19	38
8	7	12	16	18	35
9	7	14	15	19	38
8	8	9	15	17	32
4	6	10	15	21	41
8	5	12	16	19	28
10	6	12	15	24	40
6	7	9	12	12	25
7	6	9	13	15	28
10	9	12	14	18	37
9	9	15	17	19	37
8	7	12	14	22	40
3	6	11	14	19	26
8	7	8	14	16	30
7	7	11	15	19	32
7	8	11	11	18	31
8	7	10	11	18	28
8	8	12	16	19	34
7	7	9	12	21	39
7	4	11	12	19	33
9	10	15	19	22	43
9	8	14	18	23	37
9	8	6	16	17	31
4	2	9	16	18	31
6	6	9	13	19	34
6	4	8	11	15	32
6	4	7	10	14	27
8	9	10	14	18	34
3	2	6	14	17	28
8	6	9	14	19	32
8	7	9	16	16	39
6	4	7	10	14	28
10	10	11	16	20	39
2	3	9	7	16	32
9	7	12	16	18	36
6	4	9	15	16	31
6	8	10	17	21	39
5	4	11	11	16	23
4	5	7	11	14	25
7	6	12	10	16	32
5	5	8	13	19	32
8	9	13	14	19	36
6	6	11	13	19	39
9	8	11	13	18	31
6	4	12	12	16	32
4	4	11	10	14	28
7	8	12	15	19	34
2	4	3	6	11	28
8	10	10	15	18	38
9	8	13	15	18	35
6	5	10	11	16	32
5	3	6	14	20	26
7	7	11	14	18	32
8	6	12	16	20	28
4	5	9	12	16	31
9	5	10	15	18	33
9	9	15	20	19	38
9	2	9	12	19	38
7	7	6	9	15	36
5	7	9	13	17	31
7	5	15	15	21	36
9	9	15	19	24	43
8	4	9	11	16	37
6	5	11	11	13	28
9	9	9	17	21	35
8	7	11	15	16	34
7	6	10	14	17	40
7	8	9	15	17	31
7	7	6	11	18	41
8	6	12	12	18	35
10	8	13	15	23	38
6	6	12	16	20	37
6	7	12	16	20	31

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=309993&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=309993&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=309993&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.8379	0.872	0.8624	0.5318
1 excluded	0.8143	0.847	0.8235	0.5255
2 excluded	0.821	0.8587	0.8353	0.5486
3 excluded	0.8087	0.8488	0.8311	0.5289
4 excluded	0.7914	0.8412	0.8214	0.5145
5 excluded	0.7905	0.8449	0.8276	0.5214
6 excluded	0.8486	0.8602	0.8437	0.5517

\begin{tabular}{lllllllll}
\hline
Cronbach Alpha and Related Statistics \tabularnewline
Items & Cronbach Alpha & Std. Alpha & G6(smc) & Average R \tabularnewline
All itmes & 0.8379 & 0.872 & 0.8624 & 0.5318 \tabularnewline
1 excluded & 0.8143 & 0.847 & 0.8235 & 0.5255 \tabularnewline
2 excluded & 0.821 & 0.8587 & 0.8353 & 0.5486 \tabularnewline
3 excluded & 0.8087 & 0.8488 & 0.8311 & 0.5289 \tabularnewline
4 excluded & 0.7914 & 0.8412 & 0.8214 & 0.5145 \tabularnewline
5 excluded & 0.7905 & 0.8449 & 0.8276 & 0.5214 \tabularnewline
6 excluded & 0.8486 & 0.8602 & 0.8437 & 0.5517 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=309993&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.8379[/C][C]0.872[/C][C]0.8624[/C][C]0.5318[/C][/ROW]
[ROW][C]1 excluded[/C][C]0.8143[/C][C]0.847[/C][C]0.8235[/C][C]0.5255[/C][/ROW]
[ROW][C]2 excluded[/C][C]0.821[/C][C]0.8587[/C][C]0.8353[/C][C]0.5486[/C][/ROW]
[ROW][C]3 excluded[/C][C]0.8087[/C][C]0.8488[/C][C]0.8311[/C][C]0.5289[/C][/ROW]
[ROW][C]4 excluded[/C][C]0.7914[/C][C]0.8412[/C][C]0.8214[/C][C]0.5145[/C][/ROW]
[ROW][C]5 excluded[/C][C]0.7905[/C][C]0.8449[/C][C]0.8276[/C][C]0.5214[/C][/ROW]
[ROW][C]6 excluded[/C][C]0.8486[/C][C]0.8602[/C][C]0.8437[/C][C]0.5517[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=309993&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=309993&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.8379	0.872	0.8624	0.5318
1 excluded	0.8143	0.847	0.8235	0.5255
2 excluded	0.821	0.8587	0.8353	0.5486
3 excluded	0.8087	0.8488	0.8311	0.5289
4 excluded	0.7914	0.8412	0.8214	0.5145
5 excluded	0.7905	0.8449	0.8276	0.5214
6 excluded	0.8486	0.8602	0.8437	0.5517

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