data-raw/testdata.R

In johnmackintosh/spccharter: Automatically Plot, Analyse and Revise Multiple Process Control Charts

## code to prepare `testdata` dataset goes here
testdata <- 
  structure(list(report_month = structure(c(16436, 16467, 16495, 
                                            16526, 16556, 16587, 16617, 16648, 16679, 16709, 16740, 16770, 
                                            16801, 16832, 16861, 16892, 16922, 16953, 16983, 17014, 17045, 
                                            17075, 17106, 17136, 17167, 17198, 17226, 17257, 17287, 17318, 
                                            17348, 17379, 17410, 17440, 17471, 17501, 17532, 17563, 17591, 
                                            17622, 17652, 17683, 17713, 17744, 17775, 17805, 17836, 17866, 
                                            17897, 17928, 17956, 17987, 18017, 18048, 18078, 18109, 18140, 
                                            18170, 18201, 18231, 18262, 18293, 18322, 18353, 18383, 18414, 
                                            18444, 18475, 18506, 18536, 18567, 18597, 18628, 18659, 18687
  ), class = "Date"), defects = c(41L, 36L, 47L, 47L, 52L, 55L, 
                                  44L, 54L, 63L, 56L, 50L, 46L, 46L, 62L, 54L, 49L, 47L, 46L, 49L, 
                                  34L, 55L, 65L, 56L, 65L, 43L, 47L, 44L, 31L, 54L, 52L, 45L, 56L, 
                                  67L, 50L, 54L, 59L, 41L, 45L, 40L, 54L, 65L, 77L, 34L, 53L, 58L, 
                                  75L, 50L, 67L, 58L, 37L, 41L, 48L, 39L, 52L, 63L, 42L, 67L, 59L, 
                                  58L, 62L, 53L, 50L, 50L, 60L, 30L, 48L, 54L, 61L, 62L, 66L, 59L, 
                                  54L, 45L, 37L, 42L), possible = c(2160, 2190, 2151, 2170, 2004, 
                                                                    2118, 2086, 1947, 2113, 2033, 2056, 2378, 2096, 2147, 2175, 2366, 
                                                                    2229, 2179, 2174, 2151, 2299, 2180, 2301, 2350, 2254, 2387, 2263, 
                                                                    2137, 2239, 2279, 2125, 2236, 2231, 2100, 2096, 2342, 2131, 2345, 
                                                                    2311, 2177, 2401, 2394, 2245, 2300, 2236, 2165, 2075, 2625, 2259, 
                                                                    2478, 2436, 2337, 2644, 2446, 2483, 2463, 2429, 2542, 2259, 2560, 
                                                                    2546, 2654, 2413, 2568, 2502, 2433, 2449, 2540, 2504, 2449, 2304, 
                                                                    1947, 1158, 1524, 1782), testgroup = c("groupA", "groupA", "groupA", 
                                                                                                           "groupA", "groupA", "groupA", "groupA", "groupA", "groupA", "groupA", 
                                                                                                           "groupA", "groupA", "groupA", "groupA", "groupA", "groupA", "groupA", 
                                                                                                           "groupA", "groupA", "groupA", "groupA", "groupA", "groupA", "groupA", 
                                                                                                           "groupA", "groupA", "groupA", "groupA", "groupA", "groupA", "groupA", 
                                                                                                           "groupA", "groupA", "groupA", "groupA", "groupA", "groupA", "groupA", 
                                                                                                           "groupA", "groupA", "groupA", "groupA", "groupA", "groupA", "groupA", 
                                                                                                           "groupA", "groupA", "groupA", "groupA", "groupA", "groupA", "groupA", 
                                                                                                           "groupA", "groupA", "groupA", "groupA", "groupA", "groupA", "groupA", 
                                                                                                           "groupA", "groupA", "groupA", "groupA", "groupA", "groupA", "groupA", 
                                                                                                           "groupA", "groupA", "groupA", "groupA", "groupA", "groupA", "groupA", 
                                                                                                           "groupA", "groupA")), row.names = c(NA, -75L), class = "data.frame")



usethis::use_data(testdata, overwrite = TRUE)