`melanoma` <- structure(list(year = c(1936, 1937, 1938, 1939, 1940, 1941, 1942, 1943, 1944, 1945, 1946, 1947, 1948, 1949, 1950, 1951, 1952, 1953, 1954, 1955, 1956, 1957, 1958, 1959, 1960, 1961, 1962, 1963, 1964, 1965, 1966, 1967, 1968, 1969, 1970, 1971, 1972), incidence = c(0.9, 0.8, 0.8, 1.3, 1.4, 1.2, 1.7, 1.8, 1.6, 1.5, 1.5, 2, 2.5, 2.7, 2.9, 2.5, 3.1, 2.4, 2.2, 2.9, 2.5, 2.6, 3.2, 3.8, 4.2, 3.9, 3.7, 3.3, 3.7, 3.9, 4.1, 3.8, 4.7, 4.4, 4.8, 4.8, 4.8)), .Names = c("year", "incidence"), class = "data.frame", 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", "29", "30", "31", "32", "33", "34", "35", "36", "37" ))