## Not run:
# # Search for data first, then plot
# out <- ncdc(datasetid='GHCND', stationid='GHCND:USW00014895', datatypeid='PRCP',
# startdate = '2010-05-01', enddate = '2010-10-31', limit=500)
# ncdc_plot(out)
# ncdc_plot(out, breaks="14 days")
# ncdc_plot(out, breaks="1 month", dateformat="%d/%m")
# ncdc_plot(out, breaks="1 month", dateformat="%d/%m")
#
# # Combine many calls to ncdc function
# out1 <- ncdc(datasetid='GHCND', stationid='GHCND:USW00014895', datatypeid='PRCP',
# startdate = '2010-03-01', enddate = '2010-05-31', limit=500)
# out2 <- ncdc(datasetid='GHCND', stationid='GHCND:USW00014895', datatypeid='PRCP',
# startdate = '2010-09-01', enddate = '2010-10-31', limit=500)
# df <- ncdc_combine(out1, out2)
# ncdc_plot(df)
# ## or pass in each element separately
# ncdc_plot(out1, out2, breaks="45 days")
# ## End(Not run)
Run the code above in your browser using DataLab