赛时奇妙思路。

#include <bits/stdc++.h>
using namespace std;
#define int long long

int fa[100010];
int du[100010];
int to[100010];
int cnt;
int cont[100010];
int ji[100010];
int max1,max2;

void dfs(int x)
{
	if(x==0)
	{
		return;
	}
	ji[cont[x]]++;
	if(max1<ji[cont[x]])
	{
		max1=ji[cont[x]];
		max2=cont[x];
	}
	dfs(fa[x]);
}

void qing(int x)
{
	if(x==0)
	{
		return;
	}
	ji[cont[x]]=0;
	qing(fa[x]);
}

void gai(int x,int val)
{
	if(x==0)
	{
		return;
	}
	if(cont[x]==val)
	{
		cont[x]++;
	}
	gai(fa[x],val);
}


void topo()
{
	if(cnt==0)
	{
		return;
	}
	int max3=0,max4=0,add=0,max5=0;
	for(int i=1;i<=cnt;i++)
	{
		int x=to[i];
		qing(x);
		max1=0,max2=0;
		dfs(x);
		if(max1>max3)
		{
			max3=max1;
			add=max2;
			max4=x;
			max5=i;
		}
	}
	gai(max4,add);
	for(int i=max5;i<cnt;i++)
	{
		to[i]=to[i+1]; 
	}
	cnt--;
	du[fa[max4]]--;
	if(du[fa[max4]]==1&&fa[max4]!=1)
	{
		cnt++;
		to[cnt]=fa[max4];
	}
	topo();
}

main()
{
	ios::sync_with_stdio(false);
	cin.tie(0);
	cout.tie(0);
	int t;
	cin>>t;
	while(t--)
	{
		int n,h;
		cin>>n>>h;
		for(int i=2;i<=n;i++)
		{
			cin>>fa[i];
			du[fa[i]]++;
			du[i]++;
		}
		for(int i=2;i<=n;i++)
		{
			if(du[i]==1)
			{
				cnt++;
				to[cnt]=i;
			}
		}
		topo();
		int ans=0;
		for(int i=1;i<=n;i++)
		{
			ans+=cont[i];
		}
		cout<<ans+1<<endl;
		for(int i=0;i<=n;i++)
		{
			cont[i]=0;
			fa[i]=0;
			du[i]=0;
			to[i]=0;
			ji[i]=0;
		}
	}
}