班级分组--感谢fjlhgs老师的无私付出，-问题已解决，正解在7楼，

jx928867128

yjh_27 发表于 2024-8-2 10:04
前段时间，有个找团伙的贴子与此类似，只是那个条件多点。

感谢老大的关注与回贴，方便发下找团伙那个贴子的地址吗

jx928867128

yjh_27 发表于 2024-8-2 10:01
这个是集合问题，每行为一个集合，老师为集合元素。二集合有交集则合并，递归后各集合为无交集的集合(组)。

老师的思路很清晰，不知方便抽空帮我用代码实现下好吗？先谢谢您了

jx928867128

班级分组.（变换可分为多组的数据后，程序还是分成了一组）xlsm.rar (64.33 KB, 下载次数: 11)

2024-8-2 10:58 上传

点击文件名下载附件

fjlhgs 发表于 2024-8-2 08:26
数据给定其实能够分的组数上限就确定了，这套数据不可能分成2组以上，附件为自动生成最多组数，再测试或换 ...

再次感谢老师的帮忙，我下来换数据进行了测试，填写了2个不同学校的老师任课信息后，程序还是分成了一组（正确的结果应最少可以分组2组），麻烦您有空时再帮我看看好吗

fjlhgs

任凯\陈海蓝\陈琴媛\肖永会\王静芳\安晓英\朱慧 这些老师跨了2个学校

zpy2

jx928867128 发表于 2024-8-2 10:58
再次感谢老师的帮忙，我下来换数据进行了测试，填写了2个不同学校的老师任课信息后，程序还是分成了一组 ...

期望的结果是啥？
哪里2组？

jx928867128

fjlhgs 发表于 2024-8-2 11:55
任凯\陈海蓝\陈琴媛\肖永会\王静芳\安晓英\朱慧 这些老师跨了2个学校

是我太不细心了，再次感谢老师的帮忙

wengjl

jx928867128 发表于 2024-8-2 10:35
老师的思路很清晰，不知方便抽空帮我用代码实现下好吗？先谢谢您了

我不懂归集概念，但我有一个思路：
用第一行里的每个教师姓名，到以下各行中查找，找到的就 写上 1 ，再用第二行里的教师去未写上 1 的行里查找，找到就写 1。到最后一行，是第一轮。
第二轮，对剩下的A列为空的，进行相同的循环操作，是写上 2 了。.....直到第N轮，查找后，无空的了，就结束！

jx928867128

wengjl 发表于 2024-8-2 13:08
我不懂归集概念，但我有一个思路：
用第一行里的每个教师姓名，到以下各行中查找，找到的就 写上 1 ，再 ...

没太明白您的思咱，谢谢您的关注与回贴

yjh_27

jx928867128 发表于 2024-8-2 10:27
感谢老大的关注与回贴，方便发下找团伙那个贴子的地址吗

最近一段时间手边无电脑。你站内搜关键字 团伙 应该可以搜到。

zpy2

wengjl 发表于 2024-8-2 13:08
我不懂归集概念，但我有一个思路：
用第一行里的每个教师姓名，到以下各行中查找，找到的就 写上 1 ，再 ...

这个思路不错，参与一下。

<?php
$sapi_type = php_sapi_name();
if($sapi_type=='cli'){

$rootPath='/storage/emulated/0/Download/htdocs';
}else{

$rootPath=$_SERVER["DOCUMENT_ROOT"];
}
$db = new PDO('sqlite:'.$rootPath.'/EData/app/db');
function restoreNewGrp(){
global $db;
$sql="create temp table newGrp as select *  from newGrp2";
$result=$db->query($sql);
$sql="select * from newGrp";
$result=$db->query($sql)->fetchAll(PDO::FETCH_ASSOC);
//print_r($result);
}
function getNamesByClass($minClass){
global $db;
$sql="select 姓名 from newGrp where 班级 in ($minClass)";
//echo "\n".'getNamesByClass sql:'.$sql."\n";
$result=$db->query($sql)->fetchAll(PDO::FETCH_ASSOC);

$arrNames=[];
foreach ($result as $arrVal){
$arrNames[]=$arrVal["姓名"];
}
//print_r($arrNames);
$criteriaNames="'".implode("','",$arrNames)."'";
return $criteriaNames;
}
function getClasses($criteriaNames){
global $db;
$sql="select 班级 from newGrp where 姓名 in ($criteriaNames)";
//echo $sql;

$result=$db->query($sql)->fetchAll(PDO::FETCH_ASSOC);

$arrNames=[];
foreach ($result as $arrVal){
$arrNames[]=$arrVal["班级"];
}
//print_r($arrNames);
$criteriaNames="'".implode("','",$arrNames)."'";
return $criteriaNames;

}
function getNextClasses(){
global $db;
$sql="select 班级 from newGrp limit 1";
//echo $sql;

$result=$db->query($sql)->fetchAll(PDO::FETCH_ASSOC);

if(sizeof($result)==0) return '';

$criteriaNames="'".$result[0]["班级"]."'";
return $criteriaNames;

}
function deleteByClasses($classes){

global $db;
$sql="delete from newGrp where 班级 in ($classes)";
$result=$db->query($sql);
return 1;

}
function reGrp($grpId,&$arrGroup,$minClass,$criteriaNames){
if(empty(trim($minClass,"'"))){

        return;
}else{

$criteriaNames=getNamesByClass($minClass);
}
if(!empty(trim($criteriaNames,"'"))){
$arrMinClass=explode("','",trim($minClass,"'"));
foreach($arrMinClass as $aClass){
$arrGroup[$grpId][]=$aClass;
}
deleteByClasses($minClass);
}
$minClass=getClasses($criteriaNames);
if(empty(trim($minClass,"'"))){
$grpId++;
$minClass=getNextClasses();
if($criteriaNames=="''"){
return;
}else{
reGrp($grpId,$arrGroup,$minClass,$criteriaNames);       
}
}else{
reGrp($grpId,$arrGroup,$minClass,$criteriaNames);       
}
}
/*
restoreNewGrp();
$grpId=1;
$arrGroup=[];
$minClass="'1'";
$criteriaNames='';
reGrp($grpId,$arrGroup,$minClass,$criteriaNames);
echo '<pre>';
print_r($arrGroup);
*/