24小时热门版块排行榜    

查看: 3775  |  回复: 9
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

yqx1985

木虫 (著名写手)

云中仙

[求助] MATLAB如何随机分组数据

大家好我有一组数据,想对它进行随即分组,该如何完成?

举例如下:假设我有6个数据,不放设为 data=rand(1,6); 我想将这6个数据随机分为3组,注意是随机,每组含有数据是要可以变化的。

比如,这一次分组情况:数据data(1)和data(2)分到了一组,data([3,4,5])分到了另一组,data(6)分到了最后一组。
下次的分组情况:数据data(1)和data(2)分到了一组,data([3,4])分到了另一组,data([5,6])分到了最后一组。
以此等等……

因为每组所含的数据个数是不同的,所以类似我的这样的分组问题matlab是否已有提供函数或谁有好的方法实现呢?

这个问题我觉得主要是一个排列组合问题,6个样本分成3组实际上也就有那么几种方式,即:114(表示有一个组内有一个样本,另一个组内有一个样本,最后一个组内有三个样本),123,222。

所以问题可以转化成,N个样本分成m组,有几种方式?不知道这样说的话,大家是否有好的方法或建议呢?
回复此楼

» 本帖已获得的红花(最新10朵)

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

人面不知何时去,桃花依旧笑春风
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

yqx1985

木虫 (著名写手)

云中仙

引用回帖:
2楼: Originally posted by leedobb at 2011-09-05 17:31:46:
我随手编个m文件给你试试吧。编的有点复杂了。呵呵。


clear all;
data =rand(1,50);
N_div = 10;
nn =size(data); N=nn(2);

%%%% randomly redistribute this N numbers
IsRepeated = 1;
RDis(1) = ...

程序写的不错,可以满足要求,不过还是有几点建议:
(1)最好去掉 第一句 clear all 这个命令。
这个命令危害很大,往往做了半天的工作,可能在引用到含有该命令的语句时而前功尽弃;由于该命令的存在,你的脚本程序不能转化为一个函数应用,这导致你的程序虽然能完成功能,但一次只能生成一个可能的结果。而实际工作中,我们还是希望能够一次生成一系列的结果。如果将clear all去掉而强制性生成函数后,你的代码产生的结果会随着迭代的增加而出错,直至达到稳定的结果(你可以尝试下),具体为什么我没有细看。

(2)你的代码中有一段是生成随机排列的不重复整数(%% randomly redistribute this N numbers),你为此采用了一些循环判断的方法,实际上可以通过下面简单的方法实现:
RAND=rand(N,1);
[S,RDis]=sort(RAND);

RDis=randperm(N);

(3)尽量在引入未知变量时,对变量提前给出定义和内存分配

--------------------------------------------------------------------------------------------------------------
总之感谢您的热情帮助!
人面不知何时去,桃花依旧笑春风
6楼2011-09-06 00:09:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 10 个回答

leedobb

金虫 (正式写手)

【答案】应助回帖

yqx1985(金币+4): 辛苦辛苦了 2011-09-05 23:51:03
我随手编个m文件给你试试吧。编的有点复杂了。呵呵。


clear all;
data =rand(1,50);
N_div = 10;
nn =size(data); N=nn(2);

%%%% randomly redistribute this N numbers
IsRepeated = 1;
RDis(1) = 0;
for i =1:N
     IsRepeated = 1;
   while(IsRepeated == 1)
     J = floor(rand*N+1) ;
     
     if(i==1)
      IsRepeated = 0;
     end
     if(i>1)
      IsRepeated = 0;
      for j=1:i-1
       if(J==RDis(j))
           IsRepeated = 1;
       end
      end
      if(J>N)
          IsRepeated = 1;
      end
     end
   end
   RDis(i) =J;
   
   
end
%%% insert random blocks between numbers (balls).

IsRepeated = 1;
BDis(1) = 0;
for i =1:N_div-1
     IsRepeated = 1;
   while(IsRepeated == 1)
     J = floor(rand*(N-1)+1) ;
     
     if(i==1)
      IsRepeated = 0;
     end
     if(i>1)
      IsRepeated = 0;
      for j=1:i-1
       if(J==BDis(j))
           IsRepeated = 1;
       end
      end
      if(J>N-1)
          IsRepeated = 1;
      end
     end
   end
   BDis(i) =J;
end

BDis = sort(BDis);
NumDis(1,1:BDis(1)) = RDis(1:BDis(1));
NumD (1) = BDis(1);
for i=1:N_div-2
NumDis(i+1,1:BDis(i+1)-BDis(i)) =RDis(BDis(i)+1:BDis(i+1));
NumD (i+1) = BDis(i+1)-BDis(i);
end
NumDis(N_div,1:N-BDis(N_div-1)) = RDis(BDis(N_div-1)+1:N);
NumD (N_div) = N-BDis(N_div-1);

NumDis
有一天,我打了个瞌睡就到了这里,但我知道我掉入了时光的循环中,虽得以永生,但只有第一个循环有意义。
2楼2011-09-05 17:31:46
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

leedobb

金虫 (正式写手)

引用回帖:
2楼: Originally posted by leedobb at 2011-09-05 17:31:46:
我随手编个m文件给你试试吧。编的有点复杂了。呵呵。


clear all;
data =rand(1,50);
N_div = 10;
nn =size(data); N=nn(2);

%%%% randomly redistribute this N numbers
IsRepeated = 1;
RDis(1) = ...

忘了任务了,请最后再加上下面四行,呵呵。


for i = 1:N_div
    Data_out(i,1:NumD(i)) = data(NumDis(i,1:NumD(i)));
end
Data_out
有一天,我打了个瞌睡就到了这里,但我知道我掉入了时光的循环中,虽得以永生,但只有第一个循环有意义。
3楼2011-09-05 18:19:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xiuyouxu

铁杆木虫 (职业作家)

【答案】应助回帖


小雨萌萌(金币+1): 谢谢关注~ 2011-09-08 16:26:46
假设n个数, 分成m组, 先产生m个[0,1]之间的随机数, 设为ri, 然后以ri/sum(ri)为权重得到第i组的长度为mi=n*ri/sum(ri), 然后从1:n里依次随机选择mi个数, 并从1:n里去掉这些数, 继续直到选择m组.
忘记自己,忘记一切烦恼(欢迎访问我的网站兆字节:http://www.mathbeta.com/)
4楼2011-09-05 21:32:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考博] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 jCd0dEvKHShX 2026-08-29 3/150 2026-08-29 23:14 by ZPa0EcMwuECS
[基金申请] 中青基了要发朋友圈吗? +4 349506619 2026-08-28 4/200 2026-08-29 22:41 by alongwaytogo
[论文投稿] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +4 gy1nBQXYQJqL 2026-08-29 5/250 2026-08-29 21:44 by 4qO8zhfjr2AX
[硕博家园] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 gy1nBQXYQJqL 2026-08-29 3/150 2026-08-29 21:35 by 4qO8zhfjr2AX
[基金申请] 面上意见出来了 +8 黄鸟于飞Chao 2026-08-29 16/800 2026-08-29 20:45 by 黄鸟于飞Chao
[基金申请] 为什么到现在没收到通知? +4 tannykie 2026-08-29 4/200 2026-08-29 17:14 by lmz0216
[硕博家园] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +5 ASdOkHsho7FD 2026-08-28 9/450 2026-08-29 14:03 by jCd0dEvKHShX
[论文投稿] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +3 ASdOkHsho7FD 2026-08-28 4/200 2026-08-29 13:51 by jCd0dEvKHShX
[教师之家] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +4 ASdOkHsho7FD 2026-08-28 5/250 2026-08-29 11:49 by jCd0dEvKHShX
[考研] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +6 ASdOkHsho7FD 2026-08-28 9/450 2026-08-29 11:18 by jCd0dEvKHShX
[基金申请] 我就是申请一个面上项目而已,这评审意见是按照杰青的条件评的吧? +6 gouxfjh 2026-08-28 9/450 2026-08-29 09:59 by jklily
[基金申请] 2026年叶企孙基金 +4 bud_bud 2026-08-27 7/350 2026-08-29 07:23 by foolishmani
[基金申请] 系统查不到 +11 董八千 2026-08-26 11/550 2026-08-28 18:06 by Leogzhya
[基金申请] 申请删除本帖 +6 lyz123lyz 2026-08-27 7/350 2026-08-27 17:31 by 宁静致远sy
[基金申请] 基金未中,这种答复是模板吗? +5 zhaosm1982 2026-08-27 6/300 2026-08-27 16:00 by lfy8008
[基金申请] 看板上这么多中的,有点像50人群里49个人都是骗子的那种感觉…… +5 a089 2026-08-26 6/300 2026-08-27 14:05 by jonewore
[基金申请] 怎么看青基中了没有啊 +5 叶九微 2026-08-26 5/250 2026-08-27 10:35 by l_zh2008
[基金申请] 2026年8月25日国自然放榜前突然收到列入评审专家邮件,有关系吗? +25 木水思豆 2026-08-25 28/1400 2026-08-26 14:53 by draco1987
[基金申请] 牛来!米来!面来! +8 beefly 2026-08-26 8/400 2026-08-26 08:37 by xuzhipiao
[基金申请] 在坚冰还盖着北海的时候,我看到了怒放的梅花。 (金币+10) +6 ziyangfang 2026-08-25 9/450 2026-08-25 20:26 by huagongfeihu
信息提示
请填处理意见