Temperature=c(-10,25,37,50,65,80)
vent <- c(
74.5,	81.5,	83.6,	68.6,	73.1,	79.4,
75.5,	84.6,	70.6,	87.3,	73.0,	75.0,
68.9,	71.6,	55.9,	61.9,	60.5,	61.8,
57.0,	61.3,	54.1,	59.2,	56.6,	58.8,
78.3,	84.9,	64.0,	62.2,	60.1,	78.7,
54.0,	62.8,	63.0,	58.0,	56.0,	51.5,
72.5,	68.3,	67.8,	71.5,	65.0,	67.7,
80.8,	89.9,	83.2,	83.0,	85.7,	79.6)