> x <- c(76.925555,76.3743575,75.82171,75.297905,74.784705,74.28808,73.8135775, 73.3523075,72.909195,72.47972,72.05904,71.65546,71.26874,70.8880375, 70.5173475,70.15515,69.7955775,69.45207,69.117005,68.7869625,68.46607, 68.1508475,67.84432,67.5450325,67.248065,66.95757)