Skip to content

Conversation

@wagnerlmichael
Copy link
Member

Draft

@wagnerlmichael wagnerlmichael linked an issue Apr 2, 2025 that may be closed by this pull request
Comment on lines +96 to +105
group_by(meta_pin) %>%
arrange(meta_pin, desc(char_bldg_sf)) %>%
mutate(
pred_pin_card_sum_temp_to_prorate = ifelse(
meta_pin_num_cards > 3,
sum(pred_card_initial_fmv),
first(pred_card_initial_fmv)
)
) %>%
ungroup() %>%
Copy link
Member Author

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Could potentially factor this out into a function

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment

Labels

None yet

Projects

None yet

Development

Successfully merging this pull request may close these issues.

Add card value de-aggregation for multi-card proration

1 participant