给你。

df <- data.frame(sum = c(50, 20, 6))
values_list <- list()
for (i in 1:nrow(df)) {
  sum <- df$sum[i]
  values <- c()
  while (sum > 0) {
    value <- 2^floor(log2(sum))
    values <- c(values, value)
    sum <- sum - value
  }
  values_list[[i]] <- values
}
df$values <- values_list

df现在是：

sum    values
1   50    32, 16, 2
2   20    16, 4
3   6     4, 2