> ms_wh <- filter(ms_data2,city=="武汉市"&month %in% c(1:5,9:12))> head(ms_wh)
station year month day precipitation meanTem sunshine minTem maxTem site province city
15749420081102.58.4-1.89 myr 湖北省 武汉市
25749420081202.67.6-2.39.3 myr 湖北省 武汉市
35749420081304.17.3-1.711.1 myr 湖北省 武汉市
45749420081406.905.58.8 myr 湖北省 武汉市
55749420081505.76.71.313.9 myr 湖北省 武汉市
65749420081605.802.310.6 myr 湖北省 武汉市
2.单列为空
> ms_na <- filter(ms_data2,is.na(city))> head(ms_na)
station year month day precipitation meanTem sunshine minTem maxTem site province city
15760620081104.202.56.8<NA><NA><NA>25760620081204.603.27<NA><NA><NA>35760620081305.602.59.1<NA><NA><NA>45760620081406.204.57.5<NA><NA><NA>55760620081507.32.14.611<NA><NA><NA>65760620081609.24.96.914.1<NA><NA><NA>