Заполните значения на основе первого значения ячейки

Question

Предположим, что у меня есть эти данные

ProductID VarA VarB VarC VarD Month UDP 
1000  A  K  X  0  1  10 
1000  B  L  X  0  2  10.5 
1000  C  M  X  0  3  11 
1000  C  K  X  0  4  12 
1000  C  L  X  0  5  12.4 
1000  B  M  X  0  6  12.5 
1001  A  K  Y  0  1  0 
1001  B  L  Y  0  2  0 
1001  C  M  Y  0  3  0 
1001  A  K  Y  0  4  0 
1001  A  L  Y  0  5  0 
1001  B  M  Y  0  6  0 
1002  C  K  Z  1  1  0 
1002  A  L  Z  1  2  0 
1002  A  M  Z  1  3  0 
1002  B  K  Z  1  4  0 
1002  C  L  Z  1  5  0 
1002  A  M  Z  1  6  0 

Я имею UDP значения для одного продукта в течение 6 месяцев. Я хочу скопировать значения ко всем другим продуктам. Таким образом, данные выглядят как этот

ProductID VarA VarB VarC VarD Month UDP 
1000  A  K  X  0  1  10 
1000  B  L  X  0  2  10.5 
1000  C  M  X  0  3  11 
1000  C  K  X  0  4  12 
1000  C  L  X  0  5  12.4 
1000  B  M  X  0  6  12.5 
1001  A  K  Y  0  1  10 
1001  B  L  Y  0  2  10.5 
1001  C  M  Y  0  3  11 
1001  A  K  Y  0  4  12 
1001  A  L  Y  0  5  12.4 
1001  B  M  Y  0  6  12.5 
1002  C  K  Z  1  1  10 
1002  A  L  Z  1  2  10.5 
1002  A  M  Z  1  3  11 
1002  B  K  Z  1  4  12 
1002  C  L  Z  1  5  12.4 
1002  A  M  Z  1  6  12.5 

Answer 1

Мы можем использовать rep

df1$UDP <- rep(df1$UDP[df1$UDP!=0], length(unique(df1$ProductID)))