Grid[{{DateListPlot[ WeatherData["KNEW", "WindSpeed", {{2005, 8, 28}, {2005, 8, 30}}], Joined -> True, PlotRange -> All, PlotLabel -> "Wind Speed"], DateListPlot[ WeatherData["KNEW", "Pressure", {{2005, 8, 28}, {2005, 8, 30}}], Joined -> True, PlotRange -> All, PlotLabel -> "Pressure"] }}]