Mercurial > octave-dspies
comparison scripts/plot/draw/stemleaf.m @ 18654:4f43f87b7c3e
* stemleaf.m: Correct integer step value for new %d behavior.
author | Michael Godfrey <michaeldgodfrey@gmail.com> |
---|---|
date | Thu, 17 Apr 2014 10:27:09 +0100 |
parents | 7bb76a22cde1 |
children |
comparison
equal
deleted
inserted
replaced
18653:7d0014bb9e4e | 18654:4f43f87b7c3e |
---|---|
183 huidx = fix (nx + 1 - hlidx); # upper hinge index | 183 huidx = fix (nx + 1 - hlidx); # upper hinge index |
184 md = xs(mdidx); # median | 184 md = xs(mdidx); # median |
185 hl = xs(hlidx); # lower hinge | 185 hl = xs(hlidx); # lower hinge |
186 hu = xs(huidx); # upper hinge | 186 hu = xs(huidx); # upper hinge |
187 h_spread = hu - hl; # h_spread: difference between hinges | 187 h_spread = hu - hl; # h_spread: difference between hinges |
188 step = 1.5*h_spread; # step: 1.5 * h_spread | 188 step = fix(1.5*h_spread); # step: 1.5 * h_spread |
189 i_fence_l = hl - step; # inner fences: outside hinges + step | 189 i_fence_l = hl - step; # inner fences: outside hinges + step |
190 o_fence_l = hl - 2*step; # outer fences: outside hinges + 2*step | 190 o_fence_l = hl - 2*step; # outer fences: outside hinges + 2*step |
191 i_fence_h = hu + step; | 191 i_fence_h = hu + step; |
192 o_fence_h = hu + 2*step; | 192 o_fence_h = hu + 2*step; |
193 n_out_l = sum (x<i_fence_l) - sum (x<o_fence_l); | 193 n_out_l = sum (x<i_fence_l) - sum (x<o_fence_l); |
347 %! rexp = char ( | 347 %! rexp = char ( |
348 %! " Data: test minus to plus" , | 348 %! " Data: test minus to plus" , |
349 %! " " , | 349 %! " " , |
350 %! " Fenced Letter Display" , | 350 %! " Fenced Letter Display" , |
351 %! " " , | 351 %! " " , |
352 %! " #138|___________________" , | 352 %! " #138|___________________" , |
353 %! " M 69| 52 |" , | 353 %! " M 69| 52 |" , |
354 %! " H 35| 30 116| 86" , | 354 %! " H 35| 30 116| 86" , |
355 %! " 1 | -28 146|" , | 355 %! " 1 | -28 146|" , |
356 %! " _______" , | 356 %! " _______" , |
357 %! " ______| 129|_______" , | 357 %! " ______| 129|_______" , |
358 %! " f| -99 245|" , | 358 %! " f| -99 245|" , |
359 %! " | 0 0| out" , | 359 %! " | 0 0| out" , |
360 %! " F| -228 374|" , | 360 %! " F| -228 374|" , |
361 %! " | 0 0| far" , | 361 %! " | 0 0| far" , |
362 %! " " , | 362 %! " " , |
363 %! " -2 | 82" , | 363 %! " -2 | 82" , |
387 %! rexp = char ( | 387 %! rexp = char ( |
388 %! " Data: positive values above 0", | 388 %! " Data: positive values above 0", |
389 %! " " , | 389 %! " " , |
390 %! " Fenced Letter Display" , | 390 %! " Fenced Letter Display" , |
391 %! " " , | 391 %! " " , |
392 %! " # 14|___________________" , | 392 %! " # 14|___________________" , |
393 %! " M 7| 22 |" , | 393 %! " M 7| 22 |" , |
394 %! " H 4| 12 42| 30" , | 394 %! " H 4| 12 42| 30" , |
395 %! " 1 | 5 52|" , | 395 %! " 1 | 5 52|" , |
396 %! " _______" , | 396 %! " _______" , |
397 %! " ______| 45|_______" , | 397 %! " ______| 45|_______" , |
398 %! " f| -33 87|" , | 398 %! " f| -33 87|" , |
399 %! " | 0 0| out" , | 399 %! " | 0 0| out" , |
400 %! " F| -78 132|" , | 400 %! " F| -78 132|" , |
401 %! " | 0 0| far" , | 401 %! " | 0 0| far" , |
402 %! " " , | 402 %! " " , |
403 %! " 0 | 5" , | 403 %! " 0 | 5" , |
416 %! rexp = char ( | 416 %! rexp = char ( |
417 %! " Data: negative values below 0", | 417 %! " Data: negative values below 0", |
418 %! " " , | 418 %! " " , |
419 %! " Fenced Letter Display" , | 419 %! " Fenced Letter Display" , |
420 %! " " , | 420 %! " " , |
421 %! " # 14|___________________" , | 421 %! " # 14|___________________" , |
422 %! " M 7| -28 |" , | 422 %! " M 7| -28 |" , |
423 %! " H 4| -42 -12| 30" , | 423 %! " H 4| -42 -12| 30" , |
424 %! " 1 | -52 -5|" , | 424 %! " 1 | -52 -5|" , |
425 %! " _______" , | 425 %! " _______" , |
426 %! " ______| 45|_______" , | 426 %! " ______| 45|_______" , |
427 %! " f| -87 33|" , | 427 %! " f| -87 33|" , |
428 %! " | 0 0| out" , | 428 %! " | 0 0| out" , |
429 %! " F| -132 78|" , | 429 %! " F| -132 78|" , |
430 %! " | 0 0| far" , | 430 %! " | 0 0| far" , |
431 %! " " , | 431 %! " " , |
432 %! " -5 | 2" , | 432 %! " -5 | 2" , |
444 %! rexp = char ( | 444 %! rexp = char ( |
445 %! " Data: positive values from 0", | 445 %! " Data: positive values from 0", |
446 %! " " , | 446 %! " " , |
447 %! " Fenced Letter Display" , | 447 %! " Fenced Letter Display" , |
448 %! " " , | 448 %! " " , |
449 %! " # 15|___________________" , | 449 %! " # 15|___________________" , |
450 %! " M 8| 22 |" , | 450 %! " M 8| 22 |" , |
451 %! " H 4| 11 42| 31" , | 451 %! " H 4| 11 42| 31" , |
452 %! " 1 | 0 52|" , | 452 %! " 1 | 0 52|" , |
453 %! " _______" , | 453 %! " _______" , |
454 %! " ______| 46|_______" , | 454 %! " ______| 46|_______" , |
455 %! " f| -35 88|" , | 455 %! " f| -35 88|" , |
456 %! " | 0 0| out" , | 456 %! " | 0 0| out" , |
457 %! " F| -82 135|" , | 457 %! " F| -81 134|" , |
458 %! " | 0 0| far" , | 458 %! " | 0 0| far" , |
459 %! " " , | 459 %! " " , |
460 %! " 0 | 20" , | 460 %! " 0 | 20" , |
461 %! " 1 | 22118" , | 461 %! " 1 | 22118" , |
462 %! " 2 | 28" , | 462 %! " 2 | 28" , |
473 %! rexp = char ( | 473 %! rexp = char ( |
474 %! " Data: negative values from 0", | 474 %! " Data: negative values from 0", |
475 %! " " , | 475 %! " " , |
476 %! " Fenced Letter Display" , | 476 %! " Fenced Letter Display" , |
477 %! " " , | 477 %! " " , |
478 %! " # 15|___________________" , | 478 %! " # 15|___________________" , |
479 %! " M 8| -22 |" , | 479 %! " M 8| -22 |" , |
480 %! " H 4| -42 -11| 31" , | 480 %! " H 4| -42 -11| 31" , |
481 %! " 1 | -52 0|" , | 481 %! " 1 | -52 0|" , |
482 %! " _______" , | 482 %! " _______" , |
483 %! " ______| 46|_______" , | 483 %! " ______| 46|_______" , |
484 %! " f| -88 35|" , | 484 %! " f| -88 35|" , |
485 %! " | 0 0| out" , | 485 %! " | 0 0| out" , |
486 %! " F| -135 82|" , | 486 %! " F| -134 81|" , |
487 %! " | 0 0| far" , | 487 %! " | 0 0| far" , |
488 %! " " , | 488 %! " " , |
489 %! " -5 | 2" , | 489 %! " -5 | 2" , |
490 %! " -4 | 244" , | 490 %! " -4 | 244" , |
491 %! " -3 | 98" , | 491 %! " -3 | 98" , |
501 %! rexp = char ( | 501 %! rexp = char ( |
502 %! " Data: both +0 and -0 present", | 502 %! " Data: both +0 and -0 present", |
503 %! " " , | 503 %! " " , |
504 %! " Fenced Letter Display" , | 504 %! " Fenced Letter Display" , |
505 %! " " , | 505 %! " " , |
506 %! " # 5|___________________" , | 506 %! " # 5|___________________" , |
507 %! " M 3| 0 |" , | 507 %! " M 3| 0 |" , |
508 %! " H 2| -7 0| 7" , | 508 %! " H 2| -7 0| 7" , |
509 %! " 1 | -9 0|" , | 509 %! " 1 | -9 0|" , |
510 %! " _______" , | 510 %! " _______" , |
511 %! " ______| 10|_______" , | 511 %! " ______| 10|_______" , |
512 %! " f| -17 10|" , | 512 %! " f| -17 10|" , |
513 %! " | 0 0| out" , | 513 %! " | 0 0| out" , |
514 %! " F| -28 21|" , | 514 %! " F| -27 20|" , |
515 %! " | 0 0| far" , | 515 %! " | 0 0| far" , |
516 %! " " , | 516 %! " " , |
517 %! " -0 | 9700" , | 517 %! " -0 | 9700" , |
518 %! " 0 | 0" ); | 518 %! " 0 | 0" ); |
519 %! r = stemleaf (x, "both +0 and -0 present"); | 519 %! r = stemleaf (x, "both +0 and -0 present"); |
525 %! rexp = char ( | 525 %! rexp = char ( |
526 %! " Data: both <= 0 and -0 present", | 526 %! " Data: both <= 0 and -0 present", |
527 %! " " , | 527 %! " " , |
528 %! " Fenced Letter Display" , | 528 %! " Fenced Letter Display" , |
529 %! " " , | 529 %! " " , |
530 %! " # 4|___________________" , | 530 %! " # 4|___________________" , |
531 %! " M 2| -7 |" , | 531 %! " M 2| -7 |" , |
532 %! " H 1| -9 0| 9" , | 532 %! " H 1| -9 0| 9" , |
533 %! " 1 | -9 0|" , | 533 %! " 1 | -9 0|" , |
534 %! " _______" , | 534 %! " _______" , |
535 %! " ______| 13|_______" , | 535 %! " ______| 13|_______" , |
536 %! " f| -22 13|" , | 536 %! " f| -22 13|" , |
537 %! " | 0 0| out" , | 537 %! " | 0 0| out" , |
538 %! " F| -36 27|" , | 538 %! " F| -35 26|" , |
539 %! " | 0 0| far" , | 539 %! " | 0 0| far" , |
540 %! " " , | 540 %! " " , |
541 %! " -0 | 970" , | 541 %! " -0 | 970" , |
542 %! " 0 | 0" ); | 542 %! " 0 | 0" ); |
543 %! r = stemleaf (x, "both <= 0 and -0 present"); | 543 %! r = stemleaf (x, "both <= 0 and -0 present"); |
550 %! rexp = char ( | 550 %! rexp = char ( |
551 %! " Data: Chevrolet Prices EDA pg.30", | 551 %! " Data: Chevrolet Prices EDA pg.30", |
552 %! " " , | 552 %! " " , |
553 %! " Fenced Letter Display" , | 553 %! " Fenced Letter Display" , |
554 %! " " , | 554 %! " " , |
555 %! " # 17|___________________" , | 555 %! " # 17|___________________" , |
556 %! " M 9| 895 |" , | 556 %! " M 9| 895 |" , |
557 %! " H 5| 795 1499| 704" , | 557 %! " H 5| 795 1499| 704" , |
558 %! " 1 | 150 1995|" , | 558 %! " 1 | 150 1995|" , |
559 %! " _______" , | 559 %! " _______" , |
560 %! " ______| 1056|_______" , | 560 %! " ______| 1056|_______" , |