按组随机抽样,直到达到组总和的问题
创始人
2024-09-03 05:00:11
0

在R语言中,可以使用dplyr包和sample_n函数进行解决。

首先,需要将数据按组进行分组,然后在组内进行随机抽样,直到达到组总和为止。以下是实现的代码示例:

library(dplyr)

df <- data.frame(
  group = c(1, 1, 1, 2, 2, 2),
  value = c(10, 20, 30, 5, 10, 15)
)

res <- df %>%
  group_by(group) %>%
  do(sample_n(., 
              size = which.max(cumsum(.$value) >= sum(.$value) / 2), 
              replace = FALSE))

以上代码将数据集df按组分组,并使用sample_n函数在每个组内进行随机抽样,直到达到组总和的一半为止。最后,结果保存在res变量中。

注意,由于这是一种随机抽样方法,因此结果在每次运行时可能会略有不同。

相关内容

热门资讯

德扑起手牌胜率图!德扑助手,德... 德扑起手牌胜率图!德扑助手,德扑助手真是真的有挂(详细透视辅助工具教程)小薇(透视辅助)致您一封信;...
德州微扑克辅助!wpk线上德州... 德州微扑克辅助!wpk线上德州俱乐部,约局吧辅助工具获取方法(详细透视辅助神器脚本);1、约局吧辅助...
德扑ai助手!德扑之星隐藏功能... 德扑ai助手!德扑之星隐藏功能,德扑助手本来真的有挂(详细透视辅助脚本教程);1、完成德扑ai助手的...
德州ai人工智能!德州ai智能... 德州ai人工智能!德州ai智能辅助是有,云扑克辅助器真假(详细透视辅助机制黑科技)1、打开软件启动之...
德扑之星辅助器购买!德扑之星可... 德扑之星辅助器购买!德扑之星可以设置埋牌,德扑ai果然真的有挂(详细透视辅助机制教程);1、用户打开...
智星德州菠萝外 挂!德州ai辅... 智星德州菠萝外 挂!德州ai辅助工具,扑克时间辅助软件(详细透视辅助器脚本);1、下载好扑克时间辅助...
德扑之星辅助器购买!德扑之星的... 德扑之星辅助器购买!德扑之星的优势,德扑助手其实真的有挂(详细透视辅助插件教程);小薇(透视辅助)致...
德州之星有辅助挂!德州之星ap... 德州之星有辅助挂!德州之星app安卓版,fishpoker app辅助(详细透视辅助挂方法)1、这是...
德扑之星猫腻!德扑胜率最低的牌... 德扑之星猫腻!德扑胜率最低的牌,德扑之星都是真的有挂(详细透视辅助脚本教程);1、每一步都需要思考,...
德州ai人工智能!德州透视辅助... 德州ai人工智能!德州透视辅助工具,gg扑克正规(详细透视辅助插件教程);1、进入到gg扑克正规黑科...