data/resistors.R

In sjp/GeneralizedHyperbolic: The generalized hyperbolic distribution

"resistors" <-
structure(list(midpoints = c(0.337, 0.362, 0.387, 0.412, 0.437, 
0.462, 0.487, 0.512, 0.537, 0.562, 0.587, 0.612, 0.637, 0.662, 
0.687, 0.712, 0.737, 0.762, 0.787, 0.812, 0.837, 0.862, 0.887, 
0.912, 0.937, 0.962, 0.987, 1.012), counts = c(1, 1, 2, 9, 24, 
34, 44, 43, 56, 41, 46, 44, 32, 22, 29, 21, 11, 14, 7, 4, 3, 
4, 1, 2, 1, 0, 1, 3)), .Names = c("midpoints", "counts"), row.names = c("1", 
"2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12", "13", 
"14", "15", "16", "17", "18", "19", "20", "21", "22", "23", "24", 
"25", "26", "27", "28"), class = "data.frame")