diff --git a/pipeline/02-assess.R b/pipeline/02-assess.R index 8ce5436ed..74f9b8e42 100644 --- a/pipeline/02-assess.R +++ b/pipeline/02-assess.R @@ -91,7 +91,12 @@ assessment_card_data_mc <- assessment_card_data_pred %>% # For prorated PINs with multiple cards, take the average of the card # (building) across PINs. This is because the same prorated building spread # across multiple PINs sometimes receives different values from the model - group_by(meta_tieback_key_pin, meta_card_num, char_land_sf) %>% + group_by( + meta_tieback_key_pin, + meta_card_num, + char_land_sf, + meta_pin_num_cards + ) %>% mutate( pred_card_intermediate_fmv = ifelse( is.na(meta_tieback_key_pin),