Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*Unverified author*

R Software Module

rwasp_cronbach.wasp

Title produced by software

Cronbach Alpha

Date of computation

Thu, 16 Apr 2020 21:35:25 +0200

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/2020/Apr/16/t1587065843j0k5gi9goflph7h.htm/, Retrieved Sun, 05 May 2024 21:31:48 +0200

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=, Retrieved Sun, 05 May 2024 21:31:48 +0200

QR Codes:

Paste this QR Code to cite your computation.

Original text written by user:

IsPrivate?

This computation is private

User-defined keywords

Estimated Impact

Dataseries X:

Download CSV

Histogram

Boxplots

1	1	2	1	2	2	1	2	1	3	1	0	2	1	1	1	1	1	0	3	2	1	2	2	2	2	2	0	2	2	2	3	2	3	3	2	2	1	1	3
1	2	3	1	2	2	3	2	3	3	2	1	2	1	1	1	2	1	0	2	1	1	1	2	1	1	2	2	2	3	3	2	2	3	2	2	1	2	3	3
0	1	1	1	1	2	2	2	1	1	0	1	1	1	1	1	1	1	1	2	0	1	1	1	1	1	1	3	0	2	3	3	2	2	1	0	0	0	1	0
1	1	2	1	2	2	1	1	2	2	1	1	2	3	1	2	1	0	1	2	0	1	1	1	1	1	1	1	1	2	1	1	1	2	0	0	1	0	0	1
1	2	1	2	2	2	1	0	3	1	1	2	1	0	2	2	2	1	0	0	0	0	1	3	0	1	1	1	0	0	0	1	0	0	0	0	0	0	0	0
2	2	0	1	2	1	2	3	3	2	2	2	0	3	2	1	2	1	3	3	2	2	1	2	1	1	2	0	0	0	1	1	2	2	2	0	0	1	1	1
1	2	3	2	2	3	2	2	1	1	1	2	3	1	2	3	2	2	2	2	3	2	2	2	1	1	2	2	2	2	3	2	1	2	2	1	1	1	1	3
0	1	2	1	2	1	0	0	1	0	2	1	3	1	1	1	1	0	0	2	2	3	1	0	1	1	0	0	0	2	1	1	1	1	1	1	0	0	1	0
2	3	0	2	2	2	2	2	3	2	0	1	2	2	2	1	2	2	2	3	1	2	2	2	2	2	2	3	2	2	3	3	3	3	3	0	2	1	0	3
1	1	0	0	1	1	1	1	1	2	1	2	1	1	0	0	0	1	1	1	1	1	1	0	0	0	3	0	0	1	1	1	3	1	0	3	0	0	0	0

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	0 seconds
R Server	Big Analytics Cloud Computing Center
R Framework error message	The field 'Names of X columns' contains a hard return which cannot be interpreted. Please, resubmit your request without hard returns in the 'Names of X columns'.

\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 time0 seconds \tabularnewline
R ServerBig Analytics Cloud Computing Center \tabularnewline
R Framework error message & The field 'Names of X columns' contains a hard return which cannot be interpreted.
Please, resubmit your request without hard returns in the 'Names of X columns'. \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=&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]

0 seconds[/C][/ROW] [ROW]

R Server[/C]

Big Analytics Cloud Computing Center[/C][/ROW] [ROW]

R Framework error message[/C][C]

The field 'Names of X columns' contains a hard return which cannot be interpreted.
Please, resubmit your request without hard returns in the 'Names of X columns'.

[/C][/ROW] [/TABLE] Source: https://freestatistics.org/blog/index.php?pk=&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=&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	0 seconds
R Server	Big Analytics Cloud Computing Center
R Framework error message	The field 'Names of X columns' contains a hard return which cannot be interpreted. Please, resubmit your request without hard returns in the 'Names of X columns'.

Cronbach Alpha and Related Statistics
Items	Cronbach Alpha	Std. Alpha	G6(smc)	Average R
All itmes	0.9297	0.9352	1	0.2652
I1 excluded	0.9283	0.9338	1	0.2657
I2 excluded	0.9272	0.9325	1	0.2617
I3 excluded	0.9316	0.9362	1	0.2733
I4 excluded	0.9282	0.9335	1	0.2646
I5 excluded	0.9288	0.934	1	0.2663
I6 excluded	0.9276	0.9331	1	0.2634
I7 excluded	0.9265	0.9327	1	0.262
I8 excluded	0.926	0.9323	1	0.261
I9 excluded	0.9306	0.9357	1	0.2717
I10 excluded	0.9287	0.9345	1	0.2679
I11 excluded	0.9306	0.9367	1	0.2749
I12 excluded	0.9294	0.9356	1	0.2713
I13 excluded	0.9304	0.9358	1	0.2722
I14 excluded	0.9308	0.9362	1	0.2735
I15 excluded	0.9282	0.9336	1	0.2648
I16 excluded	0.9301	0.9357	1	0.2717
I17 excluded	0.9273	0.9326	1	0.2619
I18 excluded	0.9271	0.9325	1	0.2617
I19 excluded	0.9299	0.9352	1	0.2702
I20 excluded	0.9261	0.9323	1	0.2609
I21 excluded	0.9297	0.9351	1	0.2698
I22 excluded	0.9307	0.9365	1	0.2744
I23 excluded	0.9273	0.9317	1	0.259
I24 excluded	0.9281	0.9335	1	0.2647
I25 excluded	0.9261	0.9313	1	0.2581
I26 excluded	0.9271	0.9318	1	0.2594
I27 excluded	0.93	0.9359	1	0.2724
I28 excluded	0.9281	0.9337	1	0.2652
I29 excluded	0.9241	0.9306	1	0.2558
I30 excluded	0.9285	0.9345	1	0.2679
I31 excluded	0.9249	0.9317	1	0.2592
I32 excluded	0.9263	0.9324	1	0.2613
I33 excluded	0.9303	0.9361	1	0.2729
I34 excluded	0.9242	0.9309	1	0.2567
I35 excluded	0.9235	0.9305	1	0.2555
I36 excluded	0.9327	0.9369	1	0.2757
I37 excluded	0.9255	0.9312	1	0.2576
I38 excluded	0.9258	0.9313	1	0.258
I39 excluded	0.9295	0.9355	1	0.271
I40 excluded	0.9222	0.93	1	0.254

\begin{tabular}{lllllllll}
\hline
Cronbach Alpha and Related Statistics \tabularnewline
Items & Cronbach Alpha & Std. Alpha & G6(smc) & Average R \tabularnewline
All itmes & 0.9297 & 0.9352 & 1 & 0.2652 \tabularnewline
I1 excluded & 0.9283 & 0.9338 & 1 & 0.2657 \tabularnewline
I2 excluded & 0.9272 & 0.9325 & 1 & 0.2617 \tabularnewline
I3 excluded & 0.9316 & 0.9362 & 1 & 0.2733 \tabularnewline
I4 excluded & 0.9282 & 0.9335 & 1 & 0.2646 \tabularnewline
I5 excluded & 0.9288 & 0.934 & 1 & 0.2663 \tabularnewline
I6 excluded & 0.9276 & 0.9331 & 1 & 0.2634 \tabularnewline
I7 excluded & 0.9265 & 0.9327 & 1 & 0.262 \tabularnewline
I8 excluded & 0.926 & 0.9323 & 1 & 0.261 \tabularnewline
I9 excluded & 0.9306 & 0.9357 & 1 & 0.2717 \tabularnewline
I10 excluded & 0.9287 & 0.9345 & 1 & 0.2679 \tabularnewline
I11 excluded & 0.9306 & 0.9367 & 1 & 0.2749 \tabularnewline
I12 excluded & 0.9294 & 0.9356 & 1 & 0.2713 \tabularnewline
I13 excluded & 0.9304 & 0.9358 & 1 & 0.2722 \tabularnewline
I14 excluded & 0.9308 & 0.9362 & 1 & 0.2735 \tabularnewline
I15 excluded & 0.9282 & 0.9336 & 1 & 0.2648 \tabularnewline
I16 excluded & 0.9301 & 0.9357 & 1 & 0.2717 \tabularnewline
I17 excluded & 0.9273 & 0.9326 & 1 & 0.2619 \tabularnewline
I18 excluded & 0.9271 & 0.9325 & 1 & 0.2617 \tabularnewline
I19 excluded & 0.9299 & 0.9352 & 1 & 0.2702 \tabularnewline
I20 excluded & 0.9261 & 0.9323 & 1 & 0.2609 \tabularnewline
I21 excluded & 0.9297 & 0.9351 & 1 & 0.2698 \tabularnewline
I22 excluded & 0.9307 & 0.9365 & 1 & 0.2744 \tabularnewline
I23 excluded & 0.9273 & 0.9317 & 1 & 0.259 \tabularnewline
I24 excluded & 0.9281 & 0.9335 & 1 & 0.2647 \tabularnewline
I25 excluded & 0.9261 & 0.9313 & 1 & 0.2581 \tabularnewline
I26 excluded & 0.9271 & 0.9318 & 1 & 0.2594 \tabularnewline
I27 excluded & 0.93 & 0.9359 & 1 & 0.2724 \tabularnewline
I28 excluded & 0.9281 & 0.9337 & 1 & 0.2652 \tabularnewline
I29 excluded & 0.9241 & 0.9306 & 1 & 0.2558 \tabularnewline
I30 excluded & 0.9285 & 0.9345 & 1 & 0.2679 \tabularnewline
I31 excluded & 0.9249 & 0.9317 & 1 & 0.2592 \tabularnewline
I32 excluded & 0.9263 & 0.9324 & 1 & 0.2613 \tabularnewline
I33 excluded & 0.9303 & 0.9361 & 1 & 0.2729 \tabularnewline
I34 excluded & 0.9242 & 0.9309 & 1 & 0.2567 \tabularnewline
I35 excluded & 0.9235 & 0.9305 & 1 & 0.2555 \tabularnewline
I36 excluded & 0.9327 & 0.9369 & 1 & 0.2757 \tabularnewline
I37 excluded & 0.9255 & 0.9312 & 1 & 0.2576 \tabularnewline
I38 excluded & 0.9258 & 0.9313 & 1 & 0.258 \tabularnewline
I39 excluded & 0.9295 & 0.9355 & 1 & 0.271 \tabularnewline
I40
 excluded & 0.9222 & 0.93 & 1 & 0.254 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=&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.9297[/C][C]0.9352[/C][C]1[/C][C]0.2652[/C][/ROW]
[ROW][C]I1 excluded[/C][C]0.9283[/C][C]0.9338[/C][C]1[/C][C]0.2657[/C][/ROW]
[ROW][C]I2 excluded[/C][C]0.9272[/C][C]0.9325[/C][C]1[/C][C]0.2617[/C][/ROW]
[ROW][C]I3 excluded[/C][C]0.9316[/C][C]0.9362[/C][C]1[/C][C]0.2733[/C][/ROW]
[ROW][C]I4 excluded[/C][C]0.9282[/C][C]0.9335[/C][C]1[/C][C]0.2646[/C][/ROW]
[ROW][C]I5 excluded[/C][C]0.9288[/C][C]0.934[/C][C]1[/C][C]0.2663[/C][/ROW]
[ROW][C]I6 excluded[/C][C]0.9276[/C][C]0.9331[/C][C]1[/C][C]0.2634[/C][/ROW]
[ROW][C]I7 excluded[/C][C]0.9265[/C][C]0.9327[/C][C]1[/C][C]0.262[/C][/ROW]
[ROW][C]I8 excluded[/C][C]0.926[/C][C]0.9323[/C][C]1[/C][C]0.261[/C][/ROW]
[ROW][C]I9 excluded[/C][C]0.9306[/C][C]0.9357[/C][C]1[/C][C]0.2717[/C][/ROW]
[ROW][C]I10 excluded[/C][C]0.9287[/C][C]0.9345[/C][C]1[/C][C]0.2679[/C][/ROW]
[ROW][C]I11 excluded[/C][C]0.9306[/C][C]0.9367[/C][C]1[/C][C]0.2749[/C][/ROW]
[ROW][C]I12 excluded[/C][C]0.9294[/C][C]0.9356[/C][C]1[/C][C]0.2713[/C][/ROW]
[ROW][C]I13 excluded[/C][C]0.9304[/C][C]0.9358[/C][C]1[/C][C]0.2722[/C][/ROW]
[ROW][C]I14 excluded[/C][C]0.9308[/C][C]0.9362[/C][C]1[/C][C]0.2735[/C][/ROW]
[ROW][C]I15 excluded[/C][C]0.9282[/C][C]0.9336[/C][C]1[/C][C]0.2648[/C][/ROW]
[ROW][C]I16 excluded[/C][C]0.9301[/C][C]0.9357[/C][C]1[/C][C]0.2717[/C][/ROW]
[ROW][C]I17 excluded[/C][C]0.9273[/C][C]0.9326[/C][C]1[/C][C]0.2619[/C][/ROW]
[ROW][C]I18 excluded[/C][C]0.9271[/C][C]0.9325[/C][C]1[/C][C]0.2617[/C][/ROW]
[ROW][C]I19 excluded[/C][C]0.9299[/C][C]0.9352[/C][C]1[/C][C]0.2702[/C][/ROW]
[ROW][C]I20 excluded[/C][C]0.9261[/C][C]0.9323[/C][C]1[/C][C]0.2609[/C][/ROW]
[ROW][C]I21 excluded[/C][C]0.9297[/C][C]0.9351[/C][C]1[/C][C]0.2698[/C][/ROW]
[ROW][C]I22 excluded[/C][C]0.9307[/C][C]0.9365[/C][C]1[/C][C]0.2744[/C][/ROW]
[ROW][C]I23 excluded[/C][C]0.9273[/C][C]0.9317[/C][C]1[/C][C]0.259[/C][/ROW]
[ROW][C]I24 excluded[/C][C]0.9281[/C][C]0.9335[/C][C]1[/C][C]0.2647[/C][/ROW]
[ROW][C]I25 excluded[/C][C]0.9261[/C][C]0.9313[/C][C]1[/C][C]0.2581[/C][/ROW]
[ROW][C]I26 excluded[/C][C]0.9271[/C][C]0.9318[/C][C]1[/C][C]0.2594[/C][/ROW]
[ROW][C]I27 excluded[/C][C]0.93[/C][C]0.9359[/C][C]1[/C][C]0.2724[/C][/ROW]
[ROW][C]I28 excluded[/C][C]0.9281[/C][C]0.9337[/C][C]1[/C][C]0.2652[/C][/ROW]
[ROW][C]I29 excluded[/C][C]0.9241[/C][C]0.9306[/C][C]1[/C][C]0.2558[/C][/ROW]
[ROW][C]I30 excluded[/C][C]0.9285[/C][C]0.9345[/C][C]1[/C][C]0.2679[/C][/ROW]
[ROW][C]I31 excluded[/C][C]0.9249[/C][C]0.9317[/C][C]1[/C][C]0.2592[/C][/ROW]
[ROW][C]I32 excluded[/C][C]0.9263[/C][C]0.9324[/C][C]1[/C][C]0.2613[/C][/ROW]
[ROW][C]I33 excluded[/C][C]0.9303[/C][C]0.9361[/C][C]1[/C][C]0.2729[/C][/ROW]
[ROW][C]I34 excluded[/C][C]0.9242[/C][C]0.9309[/C][C]1[/C][C]0.2567[/C][/ROW]
[ROW][C]I35 excluded[/C][C]0.9235[/C][C]0.9305[/C][C]1[/C][C]0.2555[/C][/ROW]
[ROW][C]I36 excluded[/C][C]0.9327[/C][C]0.9369[/C][C]1[/C][C]0.2757[/C][/ROW]
[ROW][C]I37 excluded[/C][C]0.9255[/C][C]0.9312[/C][C]1[/C][C]0.2576[/C][/ROW]
[ROW][C]I38 excluded[/C][C]0.9258[/C][C]0.9313[/C][C]1[/C][C]0.258[/C][/ROW]
[ROW][C]I39 excluded[/C][C]0.9295[/C][C]0.9355[/C][C]1[/C][C]0.271[/C][/ROW]
[ROW][C]I40
 excluded[/C][C]0.9222[/C][C]0.93[/C][C]1[/C][C]0.254[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=&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.9297	0.9352	1	0.2652
I1 excluded	0.9283	0.9338	1	0.2657
I2 excluded	0.9272	0.9325	1	0.2617
I3 excluded	0.9316	0.9362	1	0.2733
I4 excluded	0.9282	0.9335	1	0.2646
I5 excluded	0.9288	0.934	1	0.2663
I6 excluded	0.9276	0.9331	1	0.2634
I7 excluded	0.9265	0.9327	1	0.262
I8 excluded	0.926	0.9323	1	0.261
I9 excluded	0.9306	0.9357	1	0.2717
I10 excluded	0.9287	0.9345	1	0.2679
I11 excluded	0.9306	0.9367	1	0.2749
I12 excluded	0.9294	0.9356	1	0.2713
I13 excluded	0.9304	0.9358	1	0.2722
I14 excluded	0.9308	0.9362	1	0.2735
I15 excluded	0.9282	0.9336	1	0.2648
I16 excluded	0.9301	0.9357	1	0.2717
I17 excluded	0.9273	0.9326	1	0.2619
I18 excluded	0.9271	0.9325	1	0.2617
I19 excluded	0.9299	0.9352	1	0.2702
I20 excluded	0.9261	0.9323	1	0.2609
I21 excluded	0.9297	0.9351	1	0.2698
I22 excluded	0.9307	0.9365	1	0.2744
I23 excluded	0.9273	0.9317	1	0.259
I24 excluded	0.9281	0.9335	1	0.2647
I25 excluded	0.9261	0.9313	1	0.2581
I26 excluded	0.9271	0.9318	1	0.2594
I27 excluded	0.93	0.9359	1	0.2724
I28 excluded	0.9281	0.9337	1	0.2652
I29 excluded	0.9241	0.9306	1	0.2558
I30 excluded	0.9285	0.9345	1	0.2679
I31 excluded	0.9249	0.9317	1	0.2592
I32 excluded	0.9263	0.9324	1	0.2613
I33 excluded	0.9303	0.9361	1	0.2729
I34 excluded	0.9242	0.9309	1	0.2567
I35 excluded	0.9235	0.9305	1	0.2555
I36 excluded	0.9327	0.9369	1	0.2757
I37 excluded	0.9255	0.9312	1	0.2576
I38 excluded	0.9258	0.9313	1	0.258
I39 excluded	0.9295	0.9355	1	0.271
I40 excluded	0.9222	0.93	1	0.254

Parameters (Session):

par1 = CIERTO ;

Parameters (R input):

par1 = CIERTO ;

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