首先，我们注意到花色对于斗地主不会造成任何影响，所以我们可以忽视掉花色这个信息。
然后，我们将剩余的信息，依据数码的从小到大储存。
然后我们可以注意到，对于一种出牌方式，调整一些牌组的出牌顺序对答案并不会造成影响。
并且，散牌似乎具有贪心的性质。看起来如果能出三带二那么出三带一就不会更优，如果能出四带二那出三带二就不会更优。
对于顺子的情况是一个例外，因为如果能出顺子的话，可能存在一种情况，使得不出顺子比出顺子更优；亦有可能将一个顺子出一部分会更优。故而对于顺子应该爆搜判定。
总结起来就是：爆搜出顺子，贪心出散牌。
但是仔细考虑，我们可以发现，这种贪心是一种想当然的对正确答案的近似。这事实上仅因为四不可带一这一性质。
故而，对于4 4 1 2的情况，用上述的贪心得出的答案应当是3，然而事实上只需2即可。
但是，前面仍然有一个结论是正确的——也就是，出牌顺序不对答案造成影响。又考虑到，数码的顺序其实仅对顺子而言有意义。
所以我们可以仅储存，数量为k的数码有多少种，从而可以用5^13的空间复杂度预处理每一种散牌的状态。
但是如果这么做的话会发现连样例二都过不了。这事实上是因为，暴力搜索散牌的时间复杂度是完全不可接受的。
考虑到状态数极少，可以记忆化搜索来完成预处理。
用f[i][j][k][l]表示，有i个1，j个2，k个3，l个4时的最小解决花费即可。
几个坑点：
1.出顺子的时候应当是-=,+=而非直接赋值。
2.预先判双王以后应当计算花费。
3.出顺子的时候，在遍历到长度没达到要求的区间的时候也应当先将其清零然后在遍历之后加回去。
4.注意四带二的各种拆法：理论上应当有\(C_{4}^{2}+C_{3}^{2}\)种，少一种都不行，例如：两组三张和两组四张可以把两组三张拆开来打。
真可以说是丧心病狂的模拟题。
#include<iostream>
#include<cstdio>
#include<cstring>
using namespace std;
#define dfs(X) X.srch()
//所有数+10之后mod13,13小王,14大王。
inline int Max(int A,int B){
return A>B?A:B;
}
inline int Min(int A,int B){
return A<B?A:B;
}
struct statue;
int n,ans=0x3f3f3f3f,f[14][14][9][7];
int CNT[4]={0,0,0,0};
struct statue{
int cst;
int a[15];
inline void init(){
for(int i=0;i<15;++i){
a[i]=0;
}
}
inline statue(int cstin){
cst=cstin;
}
inline void srch(){
/*
for(int i=0;i<15;++i){
printf("%d ",a[i]);
}
printf("\n");
*/
statue nw(cst+1);
for(int i=0;i<15;++i){
nw.a[i]=a[i];
}
for(int i=0;i<12;++i){
if(a[i]>=3){
nw.a[i]-=3;
for(int j=i+1;j<12;++j){
if(a[j]<3){
break;
}
nw.a[j]-=3;
dfs(nw);
}
for(int j=i+1;j<12;++j){
if(a[j]<3){
break;
}
nw.a[j]+=3;
}
nw.a[i]+=3;
}
if(a[i]>=2){
nw.a[i]-=2;
for(int j=i+1;j<12;++j){
if(a[j]<2){
break;
}
nw.a[j]-=2;
if(j-i<2){
continue;
}
dfs(nw);
}
for(int j=i+1;j<12;++j){
if(a[j]<2){
break;
}
nw.a[j]+=2;
}
nw.a[i]+=2;
}
if(a[i]>=1){
--nw.a[i];
for(int j=i+1;j<12;++j){
if(a[j]<1){
break;
}
--nw.a[j];
if(j-i<4){
continue;
}
dfs(nw);
}
for(int j=i+1;j<12;++j){
if(a[j]<1){
break;
}
++nw.a[j];
}
++nw.a[i];
}
}
CNT[0]=CNT[1]=CNT[2]=CNT[3]=0;
for(int i=0;i<15;++i){
++CNT[a[i]-1];
}
ans=Min(ans,cst+f[CNT[0]][CNT[1]][CNT[2]][CNT[3]]);
// printf("%d:%d %d %d %d\n",cst,CNT[0],CNT[1],CNT[2],CNT[3]);
}
};
int II=0,JJ=0,KK=0,LL=0;
inline int rnw(int A,int B,int C,int D){
if(A<0||B<0||C<0||D<0||A>13||B>13||C>8||D>6){
return 0;
}
f[A][B][C][D]=Min(f[A][B][C][D],f[II][JJ][KK][LL]+1);
return 0;
}
inline void prpr(){
memset(f,0x3f,sizeof(f));
f[0][0][0][0]=0;
for(int i=0;i<=13;++i){
for(int j=0;j<=13;++j){
for(int k=0;k<=8;++k){
for(int l=0;l<=6;++l){
// printf("%d %d %d %d\n",i,j,k,l);
II=i,JJ=j,KK=k,LL=l;
rnw(i,j,k,l+1);
rnw(i+2,j,k,l+1);
rnw(i,j+1,k,l+1);
rnw(i-1,j,k+1,l+1),rnw(i+1,j-1,k+1,l+1),rnw(i,j-1,k,l+2),rnw(i+1,j,k-1,l+2),rnw(i-1,j+1,k-1,l+2),rnw(i,j-2,k+2,k+1);
rnw(i,j+2,k,l+1);
rnw(i,j,k,l+2);
rnw(i-1,j+1,k+1,l+1),rnw(i-1,j-1,k+1,l+2),rnw(i-2,j,k+2,l+1);
rnw(i,j,k+1,l);
rnw(i+1,j,k+1,l);
rnw(i,j+1,k+1,l);
rnw(i,j+1,k,l);
rnw(i+1,j,k,l);
}
}
}
}
}
void init(){
ans=0x3f3f3f3f;
int x,xx;
statue s(0);
s.init();
for(int i=1;i<=n;++i){
scanf("%d%d",&x,&xx);
++s.a[(!x)?(12+xx):((x+10)%13)];
}
if(s.a[13]&&s.a[14]){
s.a[13]=s.a[14]=0;
++s.cst;
dfs(s);
--s.cst;
s.a[13]=s.a[14]=1;
}
dfs(s);
printf("%d\n",ans);
}
int main(){
prpr();
int T;
scanf("%d%d",&T,&n);
while(T--){
init();
}
return 0;
}