Mercurial > repos > greg > insect_phenology_model
comparison insect_phenology_model.R @ 46:0791cca1fc5c draft
Uploaded
author | greg |
---|---|
date | Mon, 23 Apr 2018 10:33:11 -0400 |
parents | 315c5e1bc44a |
children | 58a823b1d940 |
comparison
equal
deleted
inserted
replaced
45:315c5e1bc44a | 46:0791cca1fc5c |
---|---|
400 # the data, so delete that row if we're not in a leap year. | 400 # the data, so delete that row if we're not in a leap year. |
401 if (!is_leap_year) { | 401 if (!is_leap_year) { |
402 norm_data_frame = norm_data_frame[-c(60),]; | 402 norm_data_frame = norm_data_frame[-c(60),]; |
403 } | 403 } |
404 # Set the location to be the station name if the user elected no to enter it. | 404 # Set the location to be the station name if the user elected no to enter it. |
405 if (is.null(location)) { | 405 if (is.null(location) | location=="") { |
406 location = norm_data_frame$NAME[1]; | 406 location = norm_data_frame$NAME[1]; |
407 } | 407 } |
408 if (is.null(input_ytd)) { | 408 if (is.null(input_ytd)) { |
409 # Convert the 30 year normals data to the year-to-date format. | 409 # Convert the 30 year normals data to the year-to-date format. |
410 for (i in 1:total_days) { | 410 for (i in 1:total_days) { |