[Rd] error? at stem() (PR#6645)

[hamaoka at fbc.keio.ac.jp]

Full_Name: Yutaka Hamaoka
Version: 1.8.1(Raqua)
OS: OSX 10.3
Submission from: (NULL) (218.140.186.74)


Hi,

I've found "stem()" falls into infinit loop when x has no variance. Let's try

x<-matrix(1,nrow=100,ncol=1)
stem(x)

Then you will get infinit flow.

 The decimal point is 9 digit(s) to the left of the |

  -214748360 |
  -214748358 |
  -214748356 |
  -214748354 |
  -214748352 |
  -214748350 |
  -214748348 |
  -214748346 |
  -214748344 |
  -214748342 |


....