"flame" <-
structure(list(x = structure(c(3, 5, 7, 9, 11, 4, 6, 8, 10, 12, 
4, 6, 8, 10, 12, 14, 5, 7, 9, 11, 13, 15, 5, 7, 9, 11, 13, 15, 
17, 7, 9, 11, 13, 15, 17, 19, 8, 10, 12, 14, 16, 18, 20, 8, 10, 
12, 14, 16, 18, 20, 22, 10, 12, 14, 16, 18, 20, 22, 24, 12, 14, 
16, 18, 20, 24, 12, 14, 16, 18, 20, 22, 24, 26, 12, 14, 16, 18, 
20, 22, 24, 26, 14, 16, 18, 20, 22, 24, 26, 28, 15, 15, 15, 15, 
15, 17, 17, 17, 17, 17, 19, 19, 19, 19, 19, 19, 21, 21, 21, 21, 
21, 21, 23, 23, 23, 23, 23, 23, 23, 25, 25, 25, 25, 25, 25, 25, 
27, 27, 27, 27, 27, 27, 27, 29, 29, 29, 29, 29, 29, 29, 29, 31, 
31, 31, 31, 31, 31, 31, 31, 33, 33, 33, 33, 33, 33, 35, 35, 35, 
35, 35, 35, 35, 35, 37, 37, 37, 37, 37, 37, 37, 37, 39, 39, 39, 
39, 39, 39, 39, 39), .Dim = c(89, 2), .Dimnames = list(NULL, 
    c("Fuel", "O2"))), y = c(0.005, 0.017, 0.031, 0.041, 0.04, 
0.008, 0.021, 0.037, 0.042, 0.039, 0.007, 0.017, 0.032, 0.04, 
0.041, 0.035, 0.008, 0.018, 0.033, 0.041, 0.039, 0.034, 0.009, 
0.018, 0.029, 0.039, 0.041, 0.037, 0.033, 0.012, 0.023, 0.035, 
0.04, 0.04, 0.033, 0.033, 0.015, 0.025, 0.035, 0.041, 0.039, 
0.033, 0.03, 0.015, 0.022, 0.033, 0.039, 0.04, 0.035, 0.03, 0.029, 
0.019, 0.03, 0.037, 0.041, 0.038, 0.034, 0.029, 0.029, 0.027, 
0.034, 0.041, 0.039, 0.028, 0.026, 0.024, 0.032, 0.038, 0.039, 
0.035, 0.031, 0.027, 0.025, 0.023, 0.029, 0.037, 0.039, 0.038, 
0.033, 0.028, 0.024, 0.029, 0.036, 0.038, 0.039, 0.034, 0.029, 
0.025, 0.023)), .Names = c("x", "y"))