Displaying 1 result from an estimated 1 matches for "28a28".
Did you mean:
2828
1998 Dec 23
0
hist(1) results in a segmentation fault (at least on my machine) (PR#86)
...if(use.br)
> breaks <- sort(breaks)
20,22c20,22
< rx <- range(x)
< pretty (rx + c(0, diff(rx)/1000),
< n = if(missing(breaks)) 1 + log2(n)
---
> dx <- diff(rx <- range(x))
> nnb <-
> if(missing(breaks)) 1 + log2(n)
27d26
< })
28a28
> breaks <- pretty (rx + c(-1,1)/1000 * dx, n = nnb)
29a30,35
> if(nB == 1) {## search anew for breaks; dx is (always ?) 0.
> breaks <-
> if(abs(breaks) > 1e-20) sort(breaks * c(.8, 1.2)) else c(-.2,.2)
> nB <- length(breaks)
> }
> }
As you may...