Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_variability.wasp
Title produced by softwareVariability
Date of computationThu, 22 Aug 2024 22:25:16 +0200
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2024/Aug/22/t1724358375yvsd9vy2trcxzh3.htm/, Retrieved Sun, 03 May 2026 00:04:29 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=320123, Retrieved Sun, 03 May 2026 00:04:29 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact257
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Multiple Regression] [] [2010-11-17 09:20:01] [b98453cac15ba1066b407e146608df68]
-   PD  [Multiple Regression] [traders and order...] [2010-12-02 15:04:44] [75b8170d590d2aca2c97c1862bb2167f]
-   PD    [Multiple Regression] [] [2010-12-03 12:49:57] [916599f00c9c716123aa8433d9efa14f]
-   PD      [Multiple Regression] [zonder orders, zo...] [2010-12-03 13:02:03] [916599f00c9c716123aa8433d9efa14f]
- RMPD          [Variability] [] [2024-08-22 20:25:16] [d41d8cd98f00b204e9800998ecf8427e] [Current]
Feedback Forum

Post a new message
Dataseries X:
350	1	1595	17	60720	319369	143	7022	75	0
61	0	5565	47	94355	493408	38	6243	53	39
287	0	601	6	60720	319210	144	19868	198	0
268	1	188	11	77655	381180	67	16471	964	0
25	1	7146	105	134028	297978	367	933	14	305
418	0	1135	17	62285	290476	384	5322	80	-9
392	1	450	8	59325	292136	380	11517	205	-1
131	1	34	8	60630	314353	309	14294	3340	0
316	1	133	14	65990	339445	109	9960	1052	0
347	1	119	6	59118	303677	354	17280	872	0
68	0	2053	53	100423	397144	60	3720	96	33
70	0	4036	63	100269	424898	53	3570	56	32
147	1	0	0	60720	315380	203			0
169	1	4655	393	60720	341570	105	360	30	0
248	1	131	11	61808	308989	338	9908	834	0
152	1	1766	73	60438	305959	349	1451	60	0
351	1	312	14	58598	318690	147	8478	381	0
372	1	448	40	59781	323361	132	3084	275	0
137	1	115	13	60945	318903	145	9146	1037	0
352	1	60	10	61124	314049	314	11405	1916	0
338	1	0	0	60720	315380	180			0
258	1	364	35	47705	298466	365	2813	271	0
343	1	0	0	60720	315380	183			0
398	0	1442	118	121173	438493	49	2021	165	-3
115	0	1389	9	57530	378049	71	19783	128	6
188	1	149	5	62041	313332	318	22666	761	0
379	1	2212	14	60720	319864	142	8562	54	0
48	0	7489	322	136996	430866	50	717	31	70
366	1	0	0	60720	315380	287			0
117	1	402	26	84990	332743	115	5106	330	5
412	0	7419	29	63255	286963	387	2999	12	-5
157	1	0	0	60720	315380	219			0
264	1	307	15	58856	331955	116	8797	430	0
54	0	1134	162	146216	527021	34	2019	288	58
64	0	7561	87	82425	364304	86	1889	22	37
113	1	5131	71	86111	292154	379	1298	18	9
148	1	9	6	60835	314987	300	19165	12458	0
425	1	2264	24	55174	272713	394	3030	32	-31
7	1	40949	481	129352	1398893	9	2493	29	2865
197	0	4980	91	113521	409642	55	2304	42	0
97	1	272	8	112995	429112	51	28639	844	14
168	1	757	19	45689	382712	66	9616	242	0
69	1	1424	94	131116	374943	77	1861	123	32
127	1	0	0	60720	315380	191			0
184	0	378	52	71873	297413	369	1873	258	0
401	1	1061	5	70415	304252	353	20850	98	-4
371	1	0	0	60720	315380	290			0
174	1	203	9	61938	309596	334	12177	541	0
46	0	3689	25	101792	377305	74	7092	48	74
90	1	567	11	103345	386212	65	16928	329	20
27	0	27664	282	74996	657954	24	1624	17	247
105	1	1686	40	68696	368186	81	4205	100	11
413	0	1164	17	57320	269753	395	4103	60	-6
26	1	15824	64	63838	585715	30	6027	24	284
16	1	6575	159	151352	1071292	11	5480	133	819
19	0	37597	248	37884	992426	12	3195	21	652
336	1	314	5	60720	315371	294	23074	367	0
110	0	1932	36	72954	249898	403	1386	26	10
86	0	5692	72	64239	357312	91	2185	28	22
294	1	0	0	60720	315380	257			0
322	1	0	0	60720	315380	177			0
94	0	6533	75	126910	364839	85	2198	25	16
400	0	2126	138	21001	230621	413	222	14	-3
150	1	14	1	61016	315877	161	115877	8041	0
107	0	3192	60	59831	125390	427	-1243	-23	10
166	1	47	3	60720	314882	305	38294	2432	0
47	0	4891	217	210568	370837	79	787	35	73
182	0	531	10	71641	330068	120	13007	245	0
245	1	2332	4	72680	324385	131	31096	53	0
330	1	0	0	60720	315380	277			0
10	0	16275	109	47818	1443586	7	11409	76	1974
429	1	9252	48	79510	253537	401	1115	6	-129
2	0	29790	309	81767	4321023	2	13337	138	28328
235	1	0	0	60720	315380	204			0
187	0	2300	29	64873	352108	97	5245	66	0
213	1	267	32	57640	330059	121	4064	487	0
296	0	382	21	59365	340968	107	6713	369	0
218	1	397	28	60646	317736	152	4205	297	0
28	1	11920	182	31080	209458	419	52	1	238
5	0	54660	302	126942	1491348	6	4276	24	3040
138	1	5	2	60720	314887	304	57443	24814	0
163	1	0	0	60720	315380	218			0
219	1	0	0	60720	315380	199			0
125	0	2647	37	62920	353058	95	4137	58	1
216	1	0	0	60720	315380	201			0
196	0	0	0	60720	315380	263			0
128	1	94	7	60793	314533	308	16362	1212	0
223	1	3	2	60698	315354	296	57677	36505	0
165	1	454	51	63261	302187	357	2004	225	0
373	1	227	9	76644	336639	110	15182	603	0
324	0	0	0	60720	315380	245			0
251	1	206	9	53110	296702	372	10745	469	0
11	1	25830	115	245546	1073089	10	7592	34	1910
62	1	1528	38	60326	146494	426	-1408	-35	38
149	1	271	2	60720	325249	129	62625	463	0
270	1	138	6	69817	331420	117	21903	954	0
171	1	0	0	60720	315380	211			0
226	1	278	26	61404	314922	302	4420	413	0
276	1	282	30	62452	320016	141	4001	425	0
383	1	571	80	41477	280398	390	1005	141	0
93	1	2253	99	63593	452469	43	2550	112	17
302	1	290	2	58790	301164	360	50582	348	0
385	1	78	16	62700	317330	154	7333	1511	0
225	1	20	2	60805	315576	169	57788	5924	0
275	1	0	0	60720	315380	284			0
431	1	18073	180	27284	-7170	429	-1151	-11	-366
220	1	1866	29	56225	322331	135	4218	66	0
6	0	42634	156	157214	1629616	5	9164	34	2964
290	1	249	62	54323	292754	378	1496	373	0
129	1	422	28	57935	318056	150	4216	280	0
65	1	2675	79	59017	355178	93	1964	58	36
416	1	965	3	73490	204325	421	1442	4	-8
299	1	0	0	60720	315380	224			0
407	1	621	16	68005	317046	156	7315	188	-5
252	0	0	0	60720	315380	240			0
257	1	365	8	54820	309560	335	13695	300	0
63	0	3122	34	94670	414462	54	6308	69	38
21	0	12988	119	82340	857217	16	5523	51	601
38	0	5336	81	112477	697458	22	6141	93	132
51	0	3160	108	108094	530670	33	3062	105	66
386	1	2489	40	67804	238125	408	953	15	0
325	1	0	0	60720	315380	273			0
33	0	6984	45	80570	741409	19	12031	78	195
91	1	2001	52	95551	393343	62	3718	97	19
430	1	15236	90	77440	372631	78	1918	11	-158
259	0	0	0	60720	315380	239			0
382	1	530	60	73433	317291	155	1955	221	0
369	1	0	0	60720	315380	292			0
428	1	35624	223	157278	306275	347	477	3	-70
100	0	1383	11	73221	317892	151	10717	85	13
122	1	875	14	67000	334280	112	9591	153	3
198	0	0	0	60720	315380	259			0
289	0	0	0	60720	315380	254			0
307	0	0	0	60720	315380	222			0
389	1	72	3	60398	314210	312	38070	1591	0
210	0	265	31	60720	306948	346	3450	404	
194	1	0	0	60720	315380	186			0
277	1	335	33	64175	320398	140	3648	359	0
298	0	0	0	60720	315380	230			0
356	1	0	0	60720	315380	269			0
43	1	4525	226	93811	501749	37	1335	67	101
71	0	3045	58	27330	202055	422	35	1	31
133	1	0	0	60720	315380	196			0
212	1	0	0	60720	315380	206			0
186	0	638	14	60370	333210	114	9515	209	0
262	0	0	0	60720	315380	283			0
378	1	607	11	60436	322340	134	11122	201	0
132	1	1558	63	55637	369448	80	2690	109	0
279	0	1324	117	67440	291841	381	785	69	0
376	1	0	0	60720	315380	280			0
267	0	0	0	60720	315380	282			0
403	1	611	8	59190	296919	371	12115	159	-4
303	1	0	0	60720	315380	225			0
388	1	923	8	58620	309038	337	13630	118	0
420	1	661	3	65920	246541	405	15514	70	-12
114	0	2397	14	74020	289513	385	6394	37	6
305	1	366	53	61808	344425	101	2725	394	0
346	1	0	0	60720	315380	181			0
354	1	135	2	62065	314210	311	57105	847	0
124	0	1659	29	107577	480382	40	9668	169	2
136	1	316	9	60505	315009	299	12779	364	0
130	1	0	0	60720	315380	197			0
146	1	309	11	56535	312878	322	10262	365	0
314	0	49	8	64107	322031	137	15254	2500	0
241	1	0	0	60720	315380	200			0
34	0	4519	49	102129	597793	29	8118	88	163
384	1	0	0	60720	315380	267			0
120	1	837	69	61262	315688	165	1677	138	4
72	1	5119	49	39039	378525	69	3643	35	31
79	1	1280	117	69465	312378	326	960	88	26
99	1	2564	22	130140	403560	59	9253	79	13
108	0	2045	20	97890	510834	36	15542	152	10
119	0	2234	16	77200	214215	418	888	6	5
102	1	975	23	90534	235133	410	1528	36	13
209	0	1136	32	48522	343613	103	4488	126	0
293	1	453	21	81125	365959	84	7903	366	0
211	1	0	0	60720	315380	210			0
227	1	61	14	60720	314551	307	8182	1874	0
234	1	368	17	61686	303230	355	6072	281	0
247	0	0	0	60720	315380	233			0
49	1	4901	84	121920	469107	41	3204	55	67
88	1	540	14	103960	354228	94	11016	286	22
329	1	0	0	60720	315380	253			0
160	1	0	0	60720	315380	213			0
271	0	0	0	60720	315380	286			0
306	1	2	9	60735	315394	174	12822	63057	0
172	1	36	4	61564	312412	325	28103	3146	0
402	1	776	9	64230	333505	113	14834	172	-4
4	1	84738	588	-26007	223193	415	39	0	4145
156	1	0	0	60720	315380	217			0
315	1	3	4	60761	315656	167	28914	37920	0
399	1	529	9	63870	296261	374	10696	182	-3
381	1	0	0	60720	315380	264			0
159	1	405	7	60845	336425	111	19489	337	0
181	1	972	34	71642	359335	87	4686	164	0
278	1	0	0	60720	315380	232			0
89	1	2099	64	106611	308636	339	1697	52	20
112	0	3437	47	48022	158492	425	-883	-12	9
201	0	0	0	60720	315380	243			0
344	1	0	0	60720	315380	182			0
22	0	22330	84	79801	711969	20	6095	23	446
291	0	0	0	60720	315380	258			0
269	0	0	0	60720	315380	221			0
164	1	483	27	60830	306268	348	3936	220	0
358	1	0	0	60720	315380	279			0
118	1	2239	21	88590	442882	47	11566	108	5
92	0	2949	41	82903	378509	70	4354	61	18
300	1	0	0	60720	315380	223			0
312	1	365	83	87192	346611	99	1766	402	0
183	1	2461	57	55792	314289	310	2005	46	0
18	0	21950	519	114337	856956	17	1266	30	745
126	0	3294	23	75832	217193	416	748	5	1
193	1	141	6	61630	315366	295	19228	819	0
390	1	572	16	58580	307930	342	6746	189	-1
23	1	13326	102	165548	702380	21	4925	38	436
50	1	2284	33	76403	194493	423	-167	-2	66
206	0	10	2	61656	316155	160	58077	11639	0
162	1	0	0	60720	315380	207			0
98	0	1414	198	70184	330546	119	659	92	13
75	1	1975	35	118881	394510	61	5557	98	30
134	1	43	3	60887	312846	323	37615	2613	0
180	1	0	0	60720	315380	190			0
337	1	844	78	60925	296139	375	1233	114	0
341	1	304	15	62969	295580	376	6372	314	0
154	1	458	11	58625	297765	368	8888	213	0
36	1	18562	155	102313	377934	72	1148	10	143
192	1	0	0	60720	315380	179			0
17	1	7123	109	288170	638830	28	4026	62	769
254	1	622	73	73007	304376	352	1430	168	0
374	1	174	1	64820	307424	344	107424	618	0
35	1	2220	22	301670	644190	26	20190	200	154
377	1	121	24	56178	295370	377	3974	788	0
32	0	11819	85	106113	574339	31	4404	32	199
260	1	0	0	60720	315380	235			0
274	1	125	12	60798	310201	332	9183	883	0
406	1	1182	13	70694	327007	124	9770	107	-5
116	1	1503	39	56364	343466	104	3679	95	6
320	1	0	0	60720	315380	274			0
367	1	0	0	60720	315380	248			0
288	1	30	4	62045	318098	149	29525	3912	0
414	0	3310	33	75230	448243	44	7523	75	-6
74	1	554	11	79285	325738	125	11431	227	30
250	0	0	0	60720	315380	234			0
224	1	468	21	60720	312161	328	5341	239	0
397	1	4917	42	52811	243650	406	1039	9	-3
417	1	3256	66	35250	407159	57	3139	64	-8
323	1	0	0	60720	315380	185			0
340	1	125	13	59734	317698	153	9054	944	0
239	1	0	0	60720	315380	195			0
326	1	22	2	60722	312502	324	56251	5154	0
261	0	0	0	60720	315380	262			0
357	1	514	52	78780	322378	133	2353	238	0
313	0	0	0	60720	315380	226			0
360	1	0	0	60720	315380	270			0
272	0	0	0	60720	315380	285			0
333	1	0	0	60720	315380	276			0
355	1	0	0	60720	315380	272			0
362	1	0	0	60720	315380	268			0
37	1	10327	91	88577	640273	27	4838	43	135
42	1	13718	61	96448	345783	100	2390	11	104
57	1	3748	9	50350	652925	25	50325	121	53
30	1	14416	361	49857	439798	48	664	17	220
404	0	1526	25	69351	278990	391	3160	52	-4
80	0	666	171	117869	339836	108	818	210	25
422	1	2844	67	72683	240897	407	610	14	-15
297	1	0	0	60720	315380	229			0
318	1	368	17	61167	297141	370	5714	264	0
175	1	0	0	60720	315380	205			0
285	1	333	13	70811	331323	118	10102	394	0
339	1	26	1	60896	313880	315	113880	4328	0
243	1	0	0	60720	315380	237			0
167	1	0	0	60720	315380	193			0
411	1	1303	61	69863	309422	336	1794	84	-5
155	1	20	3	60938	315245	297	38415	5674	0
56	1	2384	97	61348	405972	58	2123	86	54
204	0	203	27	50804	300962	361	3739	498	0
178	0	71	1	60745	316176	159	116176	1646	0
295	1	53	14	59506	302409	356	7315	1932	0
396	1	562	13	58456	283587	389	6430	149	-3
393	1	622	7	60950	263276	398	9039	102	-2
135	1	645	5	60720	312075	329	22415	174	0
364	0	1763	24	61600	308336	340	4514	61	0
179	1	0	0	60720	315380	209			0
231	1	317	9	63915	298700	363	10967	311	0
319	1	1	6	60719	315372	293	19229	84213	0
191	1	275	4	59500	318745	146	29686	431	0
321	1	0	0	60720	315380	246			0
111	1	936	30	67939	408881	56	6963	223	9
29	1	8568	37	32168	786690	18	15856	68	223
423	0	11528	70	-14545	-83265	431	-4047	-25	-25
202	0	0	0	60720	315380	250			0
232	1	738	10	60720	321376	139	12138	164	0
266	1	0	0	60720	315380	281			0
405	1	592	7	64270	276898	392	10985	130	-4
176	1	126	10	60951	315547	171	11555	921	0
236	1	2	1	60743	315487	172	115487	52257	0
142	1	0	0	60720	315380	220			0
13	0	18014	239	-1710	1405225	8	5043	67	943
281	0	0	0	60720	315380	256			0
328	0	0	0	60720	315380	249			0
9	0	37704	452	60448	983660	14	1734	21	2167
207	0	63	4	65688	318574	148	29643	1891	0
73	1	1431	34	106885	310768	330	3258	77	30
242	1	94	3	61360	312887	321	37629	1200	0
229	1	192	4	65276	312339	327	28085	586	0
317	1	32	1	59988	314964	301	114964	3603	0
44	1	6869	105	117520	379983	68	1714	26	90
349	1	0	0	60720	315380	176			0
140	1	0	0	60720	315380	188			0
361	1	1	4	60722	315398	173	28849	172235	0
203	0	0	0	60720	315380	247			0
255	1	2328	94	82732	253588	400	570	23	0
308	0	209	13	64016	316647	157	8973	558	0
195	1	28	2	60890	315688	166	57844	4148	0
280	1	176	28	68136	310670	331	3952	629	0
415	1	1920	15	79420	165404	424	-2306	-18	-6
3	0	87550	458	153198	4111912	3	8541	45	17936
151	1	520	10	58650	291650	383	9165	176	0
304	0	0	0	60720	315380	231			0
421	1	1013	2	69770	253468	402	26734	53	-14
217	1	15	8	60831	315688	164	14461	7687	0
353	1	587	12	59595	325699	126	10475	214	0
58	1	5371	66	87720	446211	45	3730	46	49
359	1	0	0	60720	315380	251			0
77	1	1012	47	114768	368078	82	3576	166	26
228	1	0	0	60720	315380	215			0
83	1	876	59	138971	352850	96	2591	174	24
1	0	162556	1081	213118	6282154	1	5626	37	56289
14	1	43556	247	32648	227132	414	110	1	929
395	0	3425	12	83620	283910	388	6993	25	-3
78	1	810	43	74015	236761	409	855	45	26
190	1	0	0	60720	315380	184			0
311	0	0	0	60720	315380	244			0
39	0	2365	79	191778	550608	32	4438	148	120
101	0	1261	33	76114	307528	343	3258	85	13
256	1	0	0	60720	315380	238			0
123	1	1585	107	93099	355864	92	1457	98	2
24	1	16189	295	116384	358589	89	538	10	379
284	1	0	0	60720	315380	242			0
273	0	0	0	60720	315380	265			0
121	1	10579	92	110309	375195	76	1904	17	4
214	1	474	20	61977	288985	386	4449	188	0
348	1	0	0	60720	315380	178			0
87	1	3642	86	90262	458343	42	3004	71	22
170	1	0	0	60720	315380	192			0
200	0	472	20	80045	269587	397	3479	148	0
158	1	98	2	61490	315236	298	57618	1179	0
427	1	3999	30	51252	42754	428	-5242	-39	-58
233	1	0	0	60720	315380	216			0
345	1	621	48	60720	308256	341	2255	174	0
375	1	0	0	60720	315380	266			0
173	1	0	0	60720	315380	189			0
301	0	30	4	60798	313164	320	28291	3808	0
368	1	0	0	60720	315380	291			0
106	1	746	23	71561	269661	396	3029	93	10
208	0	0	0	60720	315380	228			0
282	1	0	0	60720	315380	255			0
249	0	0	0	60720	315380	260			0
240	1	0	0	60720	315380	194			0
52	0	4150	150	134759	518365	35	2122	77	66
55	0	4658	158	156608	233773	411	214	7	58
84	1	814	18	39625	301881	358	5660	125	23
143	1	1002	15	56750	298568	364	6571	98	0
205	0	496	17	87390	325479	128	7381	253	0
141	1	389	14	58990	325506	127	8965	322	0
12	1	12679	110	48020	984885	13	7135	62	1871
177	1	400	152	60720	313267	319	745	283	0
238	1	53	6	60349	315793	163	19299	2197	0
331	1	0	0	60720	315380	278			0
426	0	5109	97	67038	215362	417	158	3	-31
104	1	576	18	113761	314073	313	6337	198	12
409	1	438	11	58320	298096	366	8918	224	-5
292	1	165	24	62841	325176	130	5216	759	0
40	1	4069	145	79804	207393	420	51	2	119
185	0	23	5	62555	314806	306	22961	4974	0
59	1	1285	107	99489	341340	106	1321	110	49
82	0	4677	75	90131	426280	52	3017	48	24
15	0	24811	505	95350	929118	15	1444	29	822
253	1	167	2	64245	307322	345	53661	642	0
342	1	0	0	60720	315380	187			0
45	1	4628	62	69159	387475	64	3024	41	85
189	1	226	5	65745	291787	382	18357	406	0
76	0	1765	20	77623	247060	404	2353	27	28
145	1	460	15	63346	329784	122	8652	282	0
144	1	36	3	60894	315834	162	38611	3215	0
408	1	989	11	58930	304555	350	9505	106	-5
96	0	3055	43	60247	376641	75	4108	58	14
265	0	0	0	60720	315380	288			0
161	1	0	0	60720	315380	212			0
246	0	0	0	60720	315380	236			0
237	1	0	0	60720	315380	202			0
230	1	0	0	60720	315380	214			0
66	1	13253	947	90829	357760	90	167	12	35
244	1	24	8	59818	315637	168	14455	4772	0
153	1	0	0	60720	315380	208			0
199	0	0	0	60720	315380	261			0
222	1	0	0	60720	315380	198			0
363	1	0	0	60720	315380	289			0
387	1	131	6	59661	327071	123	21179	969	0
85	1	514	15	102725	377516	73	11834	346	23
103	1	3366	80	108479	299243	362	1241	29	12
60	0	9327	101	87419	387699	63	1858	20	44
309	1	384	22	54683	309836	333	4993	286	0
20	1	17821	373	122844	444477	46	655	14	643
391	1	397	10	62710	322327	136	12233	308	-1
139	1	897	5	60720	314913	303	22983	128	0
370	1	218	21	60720	315553	170	5503	531	0
31	0	3369	28	87161	688779	23	17456	145	217
109	1	5702	61	101481	321896	138	1998	21	10
41	1	8636	855	128294	301607	359	119	12	108
215	1	534	7	62620	304485	351	14926	196	0
332	1	0	0	60720	315380	275			0
310	0	0	0	60720	315380	227			0
410	1	726	3	69980	231861	412	10620	44	-5
81	1	1380	26	60982	347385	98	5669	107	25
365	1	180	11	59635	316386	158	10581	647	0
53	0	7285	115	188873	491303	39	2533	40	59
67	1	880	74	80791	261216	399	827	70	34
335	1	1	2	60727	315388	175	57694	117743	0
380	1	0	0	60720	315380	271			0
334	1	96	5	60379	313729	316	22746	1188	0
95	1	1889	45	37527	358649	88	3526	84	14
8	0	45187	353	234817	1926517	4	4891	38	2854
221	1	288	4	60510	296656	373	24164	335	0
419	1	1270	26	69206	275311	393	2897	59	-10
424	1	6526	26	55830	-42143	430	-9313	-37	-28
327	0	0	0	60720	315380	252			0
263	1	226	12	72835	343929	102	11994	636	0
394	1	694	8	68060	367655	83	20957	241	-2
286	1	0	0	60720	315380	241			0
283	1	249	72	56726	313491	317	1576	455	0




Summary of computational transaction
Raw Input view raw input (R code)
Raw Outputview raw output of R engine
Computing time0 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 time0 seconds \tabularnewline
R ServerBig Analytics Cloud Computing Center \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=320123&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] [/TABLE] Source: https://freestatistics.org/blog/index.php?pk=320123&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=320123&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 Outputview raw output of R engine
Computing time0 seconds
R ServerBig Analytics Cloud Computing Center



Parameters (Session):
Parameters (R input):
R code (references can be found in the software module):
num <- 50
res <- array(NA,dim=c(num,3))
x <- as.numeric(na.omit(x))
q1 <- function(data,n,p,i,f) {
np <- n*p;
i <<- floor(np)
f <<- np - i
qvalue <- (1-f)*data[i] + f*data[i+1]
}
q2 <- function(data,n,p,i,f) {
np <- (n+1)*p
i <<- floor(np)
f <<- np - i
qvalue <- (1-f)*data[i] + f*data[i+1]
}
q3 <- function(data,n,p,i,f) {
np <- n*p
i <<- floor(np)
f <<- np - i
if (f==0) {
qvalue <- data[i]
} else {
qvalue <- data[i+1]
}
}
q4 <- function(data,n,p,i,f) {
np <- n*p
i <<- floor(np)
f <<- np - i
if (f==0) {
qvalue <- (data[i]+data[i+1])/2
} else {
qvalue <- data[i+1]
}
}
q5 <- function(data,n,p,i,f) {
np <- (n-1)*p
i <<- floor(np)
f <<- np - i
if (f==0) {
qvalue <- data[i+1]
} else {
qvalue <- data[i+1] + f*(data[i+2]-data[i+1])
}
}
q6 <- function(data,n,p,i,f) {
np <- n*p+0.5
i <<- floor(np)
f <<- np - i
qvalue <- data[i]
}
q7 <- function(data,n,p,i,f) {
np <- (n+1)*p
i <<- floor(np)
f <<- np - i
if (f==0) {
qvalue <- data[i]
} else {
qvalue <- f*data[i] + (1-f)*data[i+1]
}
}
q8 <- function(data,n,p,i,f) {
np <- (n+1)*p
i <<- floor(np)
f <<- np - i
if (f==0) {
qvalue <- data[i]
} else {
if (f == 0.5) {
qvalue <- (data[i]+data[i+1])/2
} else {
if (f < 0.5) {
qvalue <- data[i]
} else {
qvalue <- data[i+1]
}
}
}
}
iqd <- function(x,def) {
x <-sort(x[!is.na(x)])
n<-length(x)
if (def==1) {
qvalue1 <- q1(x,n,0.25,i,f)
qvalue3 <- q1(x,n,0.75,i,f)
}
if (def==2) {
qvalue1 <- q2(x,n,0.25,i,f)
qvalue3 <- q2(x,n,0.75,i,f)
}
if (def==3) {
qvalue1 <- q3(x,n,0.25,i,f)
qvalue3 <- q3(x,n,0.75,i,f)
}
if (def==4) {
qvalue1 <- q4(x,n,0.25,i,f)
qvalue3 <- q4(x,n,0.75,i,f)
}
if (def==5) {
qvalue1 <- q5(x,n,0.25,i,f)
qvalue3 <- q5(x,n,0.75,i,f)
}
if (def==6) {
qvalue1 <- q6(x,n,0.25,i,f)
qvalue3 <- q6(x,n,0.75,i,f)
}
if (def==7) {
qvalue1 <- q7(x,n,0.25,i,f)
qvalue3 <- q7(x,n,0.75,i,f)
}
if (def==8) {
qvalue1 <- q8(x,n,0.25,i,f)
qvalue3 <- q8(x,n,0.75,i,f)
}
iqdiff <- qvalue3 - qvalue1
return(c(iqdiff,iqdiff/2,iqdiff/(qvalue3 + qvalue1)))
}
range <- max(x) - min(x)
lx <- length(x)
biasf <- (lx-1)/lx
varx <- var(x)
bvarx <- varx*biasf
sdx <- sqrt(varx)
mx <- mean(x)
bsdx <- sqrt(bvarx)
x2 <- x*x
mse0 <- sum(x2)/lx
xmm <- x-mx
xmm2 <- xmm*xmm
msem <- sum(xmm2)/lx
axmm <- abs(x - mx)
medx <- median(x)
axmmed <- abs(x - medx)
xmmed <- x - medx
xmmed2 <- xmmed*xmmed
msemed <- sum(xmmed2)/lx
qarr <- array(NA,dim=c(8,3))
for (j in 1:8) {
qarr[j,] <- iqd(x,j)
}
sdpo <- 0
adpo <- 0
for (i in 1:(lx-1)) {
for (j in (i+1):lx) {
ldi <- x[i]-x[j]
aldi <- abs(ldi)
sdpo = sdpo + ldi * ldi
adpo = adpo + aldi
}
}
denom <- (lx*(lx-1)/2)
sdpo = sdpo / denom
adpo = adpo / denom
gmd <- 0
for (i in 1:lx) {
for (j in 1:lx) {
ldi <- abs(x[i]-x[j])
gmd = gmd + ldi
}
}
gmd <- gmd / (lx*(lx-1))
sumx <- sum(x)
pk <- x / sumx
ck <- cumsum(pk)
dk <- array(NA,dim=lx)
for (i in 1:lx) {
if (ck[i] <= 0.5) dk[i] <- ck[i] else dk[i] <- 1 - ck[i]
}
bigd <- sum(dk) * 2 / (lx-1)
iod <- 1 - sum(pk*pk)
res[1,] <- c('Absolute range','absolute.htm', range)
res[2,] <- c('Relative range (unbiased)','relative.htm', range/sd(x))
res[3,] <- c('Relative range (biased)','relative.htm', range/sqrt(varx*biasf))
res[4,] <- c('Variance (unbiased)','unbiased.htm', varx)
res[5,] <- c('Variance (biased)','biased.htm', bvarx)
res[6,] <- c('Standard Deviation (unbiased)','unbiased1.htm', sdx)
res[7,] <- c('Standard Deviation (biased)','biased1.htm', bsdx)
res[8,] <- c('Coefficient of Variation (unbiased)','variation.htm', sdx/mx)
res[9,] <- c('Coefficient of Variation (biased)','variation.htm', bsdx/mx)
res[10,] <- c('Mean Squared Error (MSE versus 0)','mse.htm', mse0)
res[11,] <- c('Mean Squared Error (MSE versus Mean)','mse.htm', msem)
res[12,] <- c('Mean Absolute Deviation from Mean (MAD Mean)', 'mean2.htm', sum(axmm)/lx)
res[13,] <- c('Mean Absolute Deviation from Median (MAD Median)', 'median1.htm', sum(axmmed)/lx)
res[14,] <- c('Median Absolute Deviation from Mean', 'mean3.htm', median(axmm))
res[15,] <- c('Median Absolute Deviation from Median', 'median2.htm', median(axmmed))
res[16,] <- c('Mean Squared Deviation from Mean', 'mean1.htm', msem)
res[17,] <- c('Mean Squared Deviation from Median', 'median.htm', msemed)
load(file='createtable')
mylink1 <- 'Interquartile Difference'
mylink2 <- paste(mylink1,'(Weighted Average at Xnp)',sep=' ')
res[18,] <- c('', mylink2, qarr[1,1])
mylink2 <- paste(mylink1,'(Weighted Average at X(n+1)p)',sep=' ')
res[19,] <- c('', mylink2, qarr[2,1])
mylink2 <- paste(mylink1,'(Empirical Distribution Function)',sep=' ')
res[20,] <- c('', mylink2, qarr[3,1])
mylink2 <- paste(mylink1,'(Empirical Distribution Function - Averaging)',sep=' ')
res[21,] <- c('', mylink2, qarr[4,1])
mylink2 <- paste(mylink1,'(Empirical Distribution Function - Interpolation)',sep=' ')
res[22,] <- c('', mylink2, qarr[5,1])
mylink2 <- paste(mylink1,'(Closest Observation)',sep=' ')
res[23,] <- c('', mylink2, qarr[6,1])
mylink2 <- paste(mylink1,'(True Basic - Statistics Graphics Toolkit)',sep=' ')
res[24,] <- c('', mylink2, qarr[7,1])
mylink2 <- paste(mylink1,'(MS Excel (old versions))',sep=' ')
res[25,] <- c('', mylink2, qarr[8,1])
mylink1 <- 'Semi Interquartile Difference'
mylink2 <- paste(mylink1,'(Weighted Average at Xnp)',sep=' ')
res[26,] <- c('', mylink2, qarr[1,2])
mylink2 <- paste(mylink1,'(Weighted Average at X(n+1)p)',sep=' ')
res[27,] <- c('', mylink2, qarr[2,2])
mylink2 <- paste(mylink1,'(Empirical Distribution Function)',sep=' ')
res[28,] <- c('', mylink2, qarr[3,2])
mylink2 <- paste(mylink1,'(Empirical Distribution Function - Averaging)',sep=' ')
res[29,] <- c('', mylink2, qarr[4,2])
mylink2 <- paste(mylink1,'(Empirical Distribution Function - Interpolation)',sep=' ')
res[30,] <- c('', mylink2, qarr[5,2])
mylink2 <- paste(mylink1,'(Closest Observation)',sep=' ')
res[31,] <- c('', mylink2, qarr[6,2])
mylink2 <- paste(mylink1,'(True Basic - Statistics Graphics Toolkit)',sep=' ')
res[32,] <- c('', mylink2, qarr[7,2])
mylink2 <- paste(mylink1,'(MS Excel (old versions))',sep=' ')
res[33,] <- c('', mylink2, qarr[8,2])
mylink1 <- 'Coefficient of Quartile Variation'
mylink2 <- paste(mylink1,'(Weighted Average at Xnp)',sep=' ')
res[34,] <- c('', mylink2, qarr[1,3])
mylink2 <- paste(mylink1,'(Weighted Average at X(n+1)p)',sep=' ')
res[35,] <- c('', mylink2, qarr[2,3])
mylink2 <- paste(mylink1,'(Empirical Distribution Function)',sep=' ')
res[36,] <- c('', mylink2, qarr[3,3])
mylink2 <- paste(mylink1,'(Empirical Distribution Function - Averaging)',sep=' ')
res[37,] <- c('', mylink2, qarr[4,3])
mylink2 <- paste(mylink1,'(Empirical Distribution Function - Interpolation)',sep=' ')
res[38,] <- c('', mylink2, qarr[5,3])
mylink2 <- paste(mylink1,'(Closest Observation)',sep=' ')
res[39,] <- c('', mylink2, qarr[6,3])
mylink2 <- paste(mylink1,'(True Basic - Statistics Graphics Toolkit)',sep=' ')
res[40,] <- c('', mylink2, qarr[7,3])
mylink2 <- paste(mylink1,'(MS Excel (old versions))',sep=' ')
res[41,] <- c('', mylink2, qarr[8,3])
res[42,] <- c('Number of all Pairs of Observations', 'pair_numbers.htm', lx*(lx-1)/2)
res[43,] <- c('Squared Differences between all Pairs of Observations', 'squared_differences.htm', sdpo)
res[44,] <- c('Mean Absolute Differences between all Pairs of Observations', 'mean_abs_differences.htm', adpo)
res[45,] <- c('Gini Mean Difference', 'gini_mean_difference.htm', gmd)
res[46,] <- c('Leik Measure of Dispersion', 'leiks_d.htm', bigd)
res[47,] <- c('Index of Diversity', 'diversity.htm', iod)
res[48,] <- c('Index of Qualitative Variation', 'qualitative_variation.htm', iod*lx/(lx-1))
res[49,] <- c('Coefficient of Dispersion', 'dispersion.htm', sum(axmm)/lx/medx)
res[50,] <- c('Observations', '', lx)
print(res)
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Variability - Ungrouped Data',2,TRUE)
a<-table.row.end(a)
for (i in 1:num) {
a<-table.row.start(a)
if (res[i,1] != '') {
a<-table.element(a,res[i,1],header=TRUE)
} else {
a<-table.element(a,res[i,2],header=TRUE)
}
a<-table.element(a,signif(as.numeric(res[i,3],6)))
a<-table.row.end(a)
}
a<-table.end(a)
table.save(a,file='mytable.tab')