comparison insect_phenology_model.R @ 47:58a823b1d940 draft

Uploaded

46:0791cca1fc5c

    # the data, so delete that row if we're not in a leap year.
    if (!is_leap_year) {
        norm_data_frame = norm_data_frame[-c(60),];
    }
    # Set the location to be the station name if the user elected no to enter it.
    if (is.null(location) | location=="") {
        location = norm_data_frame$NAME[1];
    }
    if (is.null(input_ytd)) {
        # Convert the 30 year normals data to the year-to-date format.
        for (i in 1:total_days) {

47:58a823b1d940

    # the data, so delete that row if we're not in a leap year.
    if (!is_leap_year) {
        norm_data_frame = norm_data_frame[-c(60),];
    }
    # Set the location to be the station name if the user elected no to enter it.
    if (is.null(location) | length(location)==0) {
        location = norm_data_frame$NAME[1];
    }
    if (is.null(input_ytd)) {
        # Convert the 30 year normals data to the year-to-date format.
        for (i in 1:total_days) {