geyserdata<-list(n=299, t=c(
80,   71,   57,   80,   75,   77,   60,   86,   77,   56,   81,   50,   89,   54,   90,   73,   60,   83,
65,   82,   84,   54,   85,   58,   79,   57,   88,   68,   76,   78,   74,   85,   75,   65,   76,   58,
91,   50,   87,   48,   93,   54,   86,   53,   78,   52,   83,   60,   87,   49,   80,   60,   92,   43,
89,   60,   84,   69,   74,   71,  108,   50,   77,   57,   80,   61,   82,   48,   81,   73,   62,   79,
54,   80,   73,   81,   62,   81,   71,   79,   81,   74,   59,   81,   66,   87,   53,   80,   50,   87,
51,   82,   58,   81,   49,   92,   50,   88,   62,   93,   56,   89,   51,   79,   58,   82,   52,   88,
52,   78,   69,   75,   77,   53,   80,   55,   87,   53,   85,   61,   93,   54,   76,   80,   81,   59,
86,   78,   71,   77,   76,   94,   75,   50,   83,   82,   72,   77,   75,   65,   79,   72,   78,   77,
79,   75,   78,   64,   80,   49,   88,   54,   85,   51,   96,   50,   80,   78,   81,   72,   75,   78,
87,   69,   55,   83,   49,   82,   57,   84,   57,   84,   73,   78,   57,   79,   57,   90,   62,   87,
78,   52,   98,   48,   78,   79,   65,   84,   50,   83,   60,   80,   50,   88,   50,   84,   74,   76,
65,   89,   49,   88,   51,   78,   85,   65,   75,   77,   69,   92,   68,   87,   61,   81,   55,   93,
53,   84,   70,   73,   93,   50,   87,   77,   74,   72,   82,   74,   80,   49,   91,   53,   86,   49,
79,   89,   87,   76,   59,   80,   89,   45,   93,   72,   71,   54,   79,   74,   65,   78,   57,   87,
72,   84,   47,   84,   57,   87,   68,   86,   75,   73,   53,   82,   93,   77,   54,   96,   48,   89,
63,   84,   76,   62,   83,   50,   85,   78,   78,   81,   78,   76,   74,   81,   66,   84,   48,   93,
47,   87,   51,   78,   54,   87,   52,   85,   58,   88,   79))