Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*Unverified author*

R Software Module

rwasp_density.wasp

Title produced by software

Kernel Density Estimation

Date of computation

Mon, 30 Aug 2010 02:59:27 +0000

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/2010/Aug/30/t1283137130ggdhl8l0cwtq234.htm/, Retrieved Mon, 06 May 2024 11:20:41 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=79483, Retrieved Mon, 06 May 2024 11:20:41 +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

209

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

-       [Kernel Density Estimation] [] [2010-08-30 02:59:27] [d41d8cd98f00b204e9800998ecf8427e] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

001  	40    	1    	1    
002  	41    	1    	1    
003  	47    	1    	1    
004  	38    	1    	1    
005  	40    	1    	1    
006  	37    	1    	1    
007  	38    	1    	1    
008  	47    	1    	1    
009  	45    	1    	1    
010  	61    	1    	1    
011  	54    	1    	1    
012  	67    	1    	1    
013  	49    	1    	1    
014  	43    	1    	1    
015  	52    	1    	1    
016  	39    	1    	1    
017  	46    	1    	1    
018  	47    	1    	1    
019  	45    	1    	1    
020  	43    	1    	1    
021  	39    	1    	1    
022  	49    	1    	1    
023  	50    	1    	1    
024  	44    	1    	1    
025  	53    	1    	1    
026  	46    	1    	1    
027  	64    	1    	1    
028  	51    	1    	1    
029  	40    	1    	1    
030  	41    	1    	1    
031  	44    	1    	1    
032  	48    	1    	1    
033  	50    	1    	1    
034  	42    	1    	1    
035  	90    	1    	1    
036  	51    	1    	1    
037  	55    	1    	1    
038  	60    	1    	1    
039  	47    	1    	1    
040  	45    	1    	1    
041  	41    	1    	1    
042  	42    	1    	1    
043  	72    	1    	1    
044  	36    	1    	1    
045  	43    	1    	1    
046  	94    	1    	1    
047  	45    	1    	1    
048  	51    	1    	1    
049  	46    	1    	1    
050  	52    	1    	1    
051  	52    	1    	2    
052  	45    	1    	2    
053  	74    	1    	2    
054  	56    	1    	2    
055  	53    	1    	2    
056  	59    	1    	2    
057  	43    	1    	2    
058  	46    	1    	2    
059  	51    	1    	2    
060  	40    	1    	2    
061  	48    	1    	2    
062  	47    	1    	2    
063  	57    	1    	2    
064  	54    	1    	2    
065  	44    	1    	2    
066  	56    	1    	2    
067  	47    	1    	2    
068  	62    	1    	2    
069  	44    	1    	2    
070  	53    	1    	2    
071  	48    	1    	2    
072  	104   	1    	2    
073  	50    	1    	2    
074  	58    	1    	2    
075  	52    	1    	2    
076  	57    	1    	2    
077  	66    	1    	2    
078  	49    	1    	2    
079  	59    	1    	2    
080  	56    	1    	2    
081  	71    	1    	2    
082  	76    	1    	2    
083  	54    	1    	2    
084  	71    	1    	2    
085  	44    	1    	2    
086  	67    	1    	2    
087  	45    	1    	2    
088  	79    	1    	2    
089  	46    	1    	2    
090  	57    	1    	2    
091  	58    	1    	2    
092  	47    	1    	2    
093  	73    	1    	2    
094  	67    	1    	2    
095  	46    	1    	2    
096  	57    	1    	2    
097  	52    	1    	2    
098  	61    	1    	2    
099  	72    	1    	2    
100  	104   	1    	2    
101  	73    	3    	1    
102  	83    	3    	1    
103  	55    	3    	1    
104  	59    	3    	1    
105  	51    	3    	1    
106  	65    	3    	1    
107  	61    	3    	1    
108  	64    	3    	1    
109  	63    	3    	1    
110  	86    	3    	1    
111  	42    	3    	1    
112  	65    	3    	1    
113  	62    	3    	1    
114  	62    	3    	1    
115  	51    	3    	1    
116  	62    	3    	1    
117  	72    	3    	1    
118  	55    	3    	1    
119  	58    	3    	1    
120  	46    	3    	1    
121  	67    	3    	1    
122  	56    	3    	1    
123  	52    	3    	1    
124  	46    	3    	1    
125  	62    	3    	1    
126  	51    	3    	1    
127  	51    	3    	1    
128  	61    	3    	1    
129  	60    	3    	1    
130  	75    	3    	1    
131  	53    	3    	1    
132  	59    	3    	1    
133  	56    	3    	1    
134  	50    	3    	1    
135  	43    	3    	1    
136  	58    	3    	1    
137  	67    	3    	1    
138  	52    	3    	1    
139  	56    	3    	1    
140  	80    	3    	1    
141  	53    	3    	1    
142  	72    	3    	1    
143  	62    	3    	1    
144  	59    	3    	1    
145  	47    	3    	1    
146  	62    	3    	1    
147  	53    	3    	1    
148  	52    	3    	1    
149  	46    	3    	1    
150  	60    	3    	1    
151  	73    	3    	2    
152  	47    	3    	2    
153  	63    	3    	2    
154  	63    	3    	2    
155  	56    	3    	2    
156  	66    	3    	2    
157  	72    	3    	2    
158  	58    	3    	2    
159  	60    	3    	2    
160  	69    	3    	2    
161  	74    	3    	2    
162  	51    	3    	2    
163  	49    	3    	2    
164  	69    	3    	2    
165  	51    	3    	2    
166  	60    	3    	2    
167  	52    	3    	2    
168  	72    	3    	2    
169  	58    	3    	2    
170  	74    	3    	2    
171  	59    	3    	2    
172  	63    	3    	2    
173  	60    	3    	2    
174  	66    	3    	2    
175  	59    	3    	2    
176  	61    	3    	2    
177  	50    	3    	2    
178  	67    	3    	2    
179  	63    	3    	2    
180  	61    	3    	2    
181  	80    	3    	2    
182  	63    	3    	2    
183  	60    	3    	2    
184  	64    	3    	2    
185  	64    	3    	2    
186  	57    	3    	2    
187  	59    	3    	2    
188  	58    	3    	2    
189  	59    	3    	2    
190  	60    	3    	2    
191  	62    	3    	2    
192  	63    	3    	2    
193  	67    	3    	2    
194  	78    	3    	2    
195  	61    	3    	2    
196  	52    	3    	2    
197  	51    	3    	2    
198  	56    	3    	2    
199  	95    	3    	2    
200  	54    	3    	2    
201  	39    	5    	1    
202  	65    	5    	1    
203  	53    	5    	1    
204  	46    	5    	1    
205  	78    	5    	1    
206  	60    	5    	1    
207  	71    	5    	1    
208  	58    	5    	1    
209  	87    	5    	1    
210  	77    	5    	1    
211  	62    	5    	1    
212  	94    	5    	1    
213  	81    	5    	1    
214  	46    	5    	1    
215  	49    	5    	1    
216  	62    	5    	1    
217  	55    	5    	1    
218  	59    	5    	1    
219  	88    	5    	1    
220  	56    	5    	1    
221  	77    	5    	1    
222  	67    	5    	1    
223  	79    	5    	1    
224  	54    	5    	1    
225  	83    	5    	1    
226  	75    	5    	1    
227  	67    	5    	1    
228  	60    	5    	1    
229  	65    	5    	1    
230  	62    	5    	1    
231  	62    	5    	1    
232  	62    	5    	1    
233  	60    	5    	1    
234  	58    	5    	1    
235  	67    	5    	1    
236  	48    	5    	1    
237  	51    	5    	1    
238  	67    	5    	1    
239  	98    	5    	1    
240  	64    	5    	1    
241  	57    	5    	1    
242  	67    	5    	1    
243  	55    	5    	1    
244  	55    	5    	1    
245  	66    	5    	1    
246  	60    	5    	1    
247  	57    	5    	1    
248  	54    	5    	1    
249  	78    	5    	1    
250  	69    	5    	1    
251  	66    	5    	2    
252  	53    	5    	2    
253  	61    	5    	2    
254  	74    	5    	2    
255  	76    	5    	2    
256  	69    	5    	2    
257  	82    	5    	2    
258  	56    	5    	2    
259  	66    	5    	2    
260  	63    	5    	2    
261  	69    	5    	2    
262  	76    	5    	2    
263  	71    	5    	2    
264  	65    	5    	2    
265  	67    	5    	2    
266  	67    	5    	2    
267  	55    	5    	2    
268  	65    	5    	2    
269  	58    	5    	2    
270  	64    	5    	2    
271  	65    	5    	2    
272  	81    	5    	2    
273  	69    	5    	2    
274  	69    	5    	2    
275  	63    	5    	2    
276  	68    	5    	2    
277  	70    	5    	2    
278  	80    	5    	2    
279  	68    	5    	2    
280  	125   	5    	2    
281  	63    	5    	2    
282  	74    	5    	2    
283  	61    	5    	2    
284  	85    	5    	2    
285  	59    	5    	2    
286  	61    	5    	2    
287  	74    	5    	2    
288  	76    	5    	2    
289  	62    	5    	2    
290  	83    	5    	2    
291  	58    	5    	2    
292  	72    	5    	2    
293  	65    	5    	2    
294  	61    	5    	2

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	'Sir Ronald Aylmer Fisher' @ 193.190.124.24

\begin{tabular}{lllllllll}
\hline
Summary of computational transaction \tabularnewline
Raw Input & view raw input (R code)  \tabularnewline
Raw Output & view raw output of R engine  \tabularnewline
Computing time & 1 seconds \tabularnewline
R Server & 'Sir Ronald Aylmer Fisher' @ 193.190.124.24 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=79483&T=0

[TABLE]
[ROW][C]Summary of computational transaction[/C][/ROW]
[ROW][C]Raw Input[/C][C]view raw input (R code) [/C][/ROW]
[ROW][C]Raw Output[/C][C]view raw output of R engine [/C][/ROW]
[ROW][C]Computing time[/C][C]1 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Sir Ronald Aylmer Fisher' @ 193.190.124.24[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=79483&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=79483&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	'Sir Ronald Aylmer Fisher' @ 193.190.124.24

Parameters (Session):

par1 = 0 ;

Parameters (R input):

par1 = 0 ;

R code (references can be found in the software module):

if (par1 == '0') bw <- 'nrd0'
if (par1 != '0') bw <- as.numeric(par1)
bitmap(file='density1.png')
mydensity1<-density(x,bw=bw,kernel='gaussian',na.rm=TRUE)
plot(mydensity1,main='Gaussian Kernel',xlab=xlab,ylab=ylab)
grid()
dev.off()
mydensity1
bitmap(file='density2.png')
mydensity2<-density(x,bw=bw,kernel='epanechnikov',na.rm=TRUE)
plot(mydensity2,main='Epanechnikov Kernel',xlab=xlab,ylab=ylab)
grid()
dev.off()
bitmap(file='density3.png')
mydensity3<-density(x,bw=bw,kernel='rectangular',na.rm=TRUE)
plot(mydensity3,main='Rectangular Kernel',xlab=xlab,ylab=ylab)
grid()
dev.off()
bitmap(file='density4.png')
mydensity4<-density(x,bw=bw,kernel='triangular',na.rm=TRUE)
plot(mydensity4,main='Triangular Kernel',xlab=xlab,ylab=ylab)
grid()
dev.off()
bitmap(file='density5.png')
mydensity5<-density(x,bw=bw,kernel='biweight',na.rm=TRUE)
plot(mydensity5,main='Biweight Kernel',xlab=xlab,ylab=ylab)
grid()
dev.off()
bitmap(file='density6.png')
mydensity6<-density(x,bw=bw,kernel='cosine',na.rm=TRUE)
plot(mydensity6,main='Cosine Kernel',xlab=xlab,ylab=ylab)
grid()
dev.off()
bitmap(file='density7.png')
mydensity7<-density(x,bw=bw,kernel='optcosine',na.rm=TRUE)
plot(mydensity7,main='Optcosine Kernel',xlab=xlab,ylab=ylab)
grid()
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Properties of Density Trace',2,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Bandwidth',header=TRUE)
a<-table.element(a,mydensity1$bw)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'#Observations',header=TRUE)
a<-table.element(a,mydensity1$n)
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