#include<bits/stdc++.h>
using namespace std;
constexpr int mxn{1000005};
int Q,n,p[mxn],top[mxn],gs[mxn],len[mxn],cnt;
unordered_set<int>sons[mxn];
void dfs(int x,int dep)
{
    gs[x]=x;
    len[x]=dep;
    for(int v:sons[x])
    {
        dfs(v,dep+1);
        if(len[v]>len[x])
        {
            len[x]=len[v];
            gs[x]=v;
        }
    }
}
unordered_set<int>leaf;
void dfs2(int x,int t)
{
    if(x==t)
        cnt++;
    top[x]=t;
    for(int v:sons[x])
    {
        if(v==gs[x])
            dfs2(v,t);
        else
            dfs2(v,v);
    }
    if(sons[x].empty())
        leaf.insert(x);
}
int main()
{
    cin.tie(nullptr);
    ios::sync_with_stdio(false);
    cin>>Q;
    while(Q--)
    {   
        cin>>n;
		fill_n(sons,n,unordered_set<int>{});
		for(int i=1;i<n;++i)
		{
			cin>>p[i];--p[i];
			sons[p[i]].insert(i);
		}
		dfs(0,1);
        // for(int i=0;i<n;++i)
        //     cout<<len[i]<<' ';
        //     cout<<'\n';
        cnt=0;
        leaf.clear();
        dfs2(0,0);
        int ans=len[0];
        for(int i=0;!sons[0].empty();++i)
        {
            ans=min(ans,i+cnt);
            unordered_set<int>nl;
            for(int u:leaf)
            {
                if(top[u]==u)
                    cnt--;
                sons[p[u]].erase(u);
                if(sons[p[u]].empty())
                    nl.insert(p[u]);
            }
            leaf=nl;
        }
        cout<<ans<<'\n';
    }
    return 0;
}