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

[dmurdoch at pair.com]

On Thu,  4 Mar 2004 13:28:16 +0100 (CET), hamaoka at fbc.keio.ac.jp wrote
>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)

I get a different wrong answer in 1.8.1 for Windows:

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

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

  -214748360 |
-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8-8+20

No loop, but not right either.

The same results show up in r-patched and r-devel.

I'll try to track it down...

Duncan Murdoch