R version 2.9.0 (2009-04-17) Copyright (C) 2009 The R Foundation for Statistical Computing ISBN 3-900051-07-0 R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. Type 'license()' or 'licence()' for distribution details. R is a collaborative project with many contributors. Type 'contributors()' for more information and 'citation()' on how to cite R or R packages in publications. Type 'demo()' for some demos, 'help()' for on-line help, or 'help.start()' for an HTML browser interface to help. Type 'q()' to quit R. > x <- c(426113,383703,232444,70939,226731,947293,611281,158047,33999,37028,388.3,506652,392.25,180818,198296,217465,275562,1030944,57.47,136452,556277,213361,274482,220553,236.71,260642,2763544,213923,169861,403064,449594,406167,206893,156187,257102,62156,662883,251422,171328,350089,221588,4813,183186,190379,223166,232669,356725,109215,475834,315955,694.87,8.95,278741,308.16,207533,192797,601162,289714,293671,386688,699645,85094,131812,645285,197549,308174,86.58,242205,238502,187881,140321,440.31,421403,218761,1305923,137.55,262517,348821,150034,64016,261596,259.7,171.26,203077,249148,211655,252.64,438555,239.89,401915,216886,184641,380155,653641,313906,366936,236302,229641,235577,103898,263906,241171,216548,295281,193299,204386,257567,136813,240755,59609,213511,380531,242344,250407,183613,191835,266793,246542,330563,403556,208108,324.04,308532,199297,200156,262875,287069,190157,199746,265777,435956,72844,756.46,206771,4202361,401422,216046,39047,441437) > par3 = '1e-02' > par2 = '80' > par1 = '20' > #'GNU S' R Code compiled by R2WASP v. 1.0.44 () > #Author: Prof. Dr. P. Wessa > #To cite this work: AUTHOR(S), (YEAR), YOUR SOFTWARE TITLE (vNUMBER) in Free Statistics Software (v$_version), Office for Research Development and Education, URL http://www.wessa.net/rwasp_YOURPAGE.wasp/ > #Source of accompanying publication: Office for Research, Development, and Education > #Technical description: Write here your technical program description (don't use hard returns!) > par1 <- as.numeric(par1) > par2 <- as.numeric(par2) > par3 <- as.numeric(par3) > stem(x,par1,par2,par3) The decimal point is 4 digit(s) to the right of the | 0 | 00000000000000115 1 | 2 | 3 | 479 4 | 5 | 6 | 024 7 | 13 8 | 5 9 | 10 | 49 11 | 12 | 13 | 267 14 | 0 15 | 068 16 | 17 | 01 18 | 13458 19 | 00233889 20 | 00347788 21 | 234467779 22 | 1237 23 | 023669 24 | 112279 25 | 0178 26 | 1233467 27 | 469 28 | 7 29 | 045 30 | 89 31 | 46 32 | 33 | 1 34 | 9 35 | 07 36 | 7 37 | 38 | 0147 39 | 40 | 12346 41 | 42 | 16 43 | 69 44 | 1 45 | 0 46 | 47 | 6 48 | 49 | 50 | 7 51 | 52 | 53 | 54 | 55 | 6 56 | 57 | 58 | 59 | 60 | 1 61 | 1 62 | 63 | 64 | 5 65 | 4 66 | 3 67 | 68 | 69 | 70 | 0 71 | 72 | 73 | 74 | 75 | 76 | 77 | 78 | 79 | 80 | 81 | 82 | 83 | 84 | 85 | 86 | 87 | 88 | 89 | 90 | 91 | 92 | 93 | 94 | 7 95 | 96 | 97 | 98 | 99 | 100 | 101 | 102 | 103 | 1 104 | 105 | 106 | 107 | 108 | 109 | 110 | 111 | 112 | 113 | 114 | 115 | 116 | 117 | 118 | 119 | 120 | 121 | 122 | 123 | 124 | 125 | 126 | 127 | 128 | 129 | 130 | 6 131 | 132 | 133 | 134 | 135 | 136 | 137 | 138 | 139 | 140 | 141 | 142 | 143 | 144 | 145 | 146 | 147 | 148 | 149 | 150 | 151 | 152 | 153 | 154 | 155 | 156 | 157 | 158 | 159 | 160 | 161 | 162 | 163 | 164 | 165 | 166 | 167 | 168 | 169 | 170 | 171 | 172 | 173 | 174 | 175 | 176 | 177 | 178 | 179 | 180 | 181 | 182 | 183 | 184 | 185 | 186 | 187 | 188 | 189 | 190 | 191 | 192 | 193 | 194 | 195 | 196 | 197 | 198 | 199 | 200 | 201 | 202 | 203 | 204 | 205 | 206 | 207 | 208 | 209 | 210 | 211 | 212 | 213 | 214 | 215 | 216 | 217 | 218 | 219 | 220 | 221 | 222 | 223 | 224 | 225 | 226 | 227 | 228 | 229 | 230 | 231 | 232 | 233 | 234 | 235 | 236 | 237 | 238 | 239 | 240 | 241 | 242 | 243 | 244 | 245 | 246 | 247 | 248 | 249 | 250 | 251 | 252 | 253 | 254 | 255 | 256 | 257 | 258 | 259 | 260 | 261 | 262 | 263 | 264 | 265 | 266 | 267 | 268 | 269 | 270 | 271 | 272 | 273 | 274 | 275 | 276 | 4 277 | 278 | 279 | 280 | 281 | 282 | 283 | 284 | 285 | 286 | 287 | 288 | 289 | 290 | 291 | 292 | 293 | 294 | 295 | 296 | 297 | 298 | 299 | 300 | 301 | 302 | 303 | 304 | 305 | 306 | 307 | 308 | 309 | 310 | 311 | 312 | 313 | 314 | 315 | 316 | 317 | 318 | 319 | 320 | 321 | 322 | 323 | 324 | 325 | 326 | 327 | 328 | 329 | 330 | 331 | 332 | 333 | 334 | 335 | 336 | 337 | 338 | 339 | 340 | 341 | 342 | 343 | 344 | 345 | 346 | 347 | 348 | 349 | 350 | 351 | 352 | 353 | 354 | 355 | 356 | 357 | 358 | 359 | 360 | 361 | 362 | 363 | 364 | 365 | 366 | 367 | 368 | 369 | 370 | 371 | 372 | 373 | 374 | 375 | 376 | 377 | 378 | 379 | 380 | 381 | 382 | 383 | 384 | 385 | 386 | 387 | 388 | 389 | 390 | 391 | 392 | 393 | 394 | 395 | 396 | 397 | 398 | 399 | 400 | 401 | 402 | 403 | 404 | 405 | 406 | 407 | 408 | 409 | 410 | 411 | 412 | 413 | 414 | 415 | 416 | 417 | 418 | 419 | 420 | 2 > > #Note: the /var/www/html/rcomp/createtable file can be downloaded at http://www.wessa.net/cretab > load(file="/var/www/html/rcomp/createtable") > > a<-table.start() > a<-table.row.start(a) > a<-table.element(a,'Stem-and-leaf Plot',1,TRUE) > a<-table.row.end(a) > a<-table.row.start(a) > a<-table.element(a,'Please, click the above output link to view the Stem-and-leaf plot') > a<-table.row.end(a) > a<-table.end(a) > table.save(a,file="/var/www/html/rcomp/tmp/1svu21286225391.tab") > > > proc.time() user system elapsed 0.192 0.031 0.235