:[p=p=n];
表[Count[f[n],p_/;MemberQ[p,Length[p]]&&MemberQ[p,d[p]]],{n,0,z}](*A241377号*)
表[Count[f[n],p_2;!MemberQ[p,Length[p]]&&MemberQ[p,d[p]]],{n,0,z}](*A241378号*)
表[Count[f[n],p_/;MemberQ[p,Length[p]&&!成员q[p,d[p]],{n,0,z}](*A241379号*)
表[Count[f[n],p_2;!成员Q[p,长度[p]]&&!成员q[p,d[p]],{n,0,z}](*A241380*)
表[Count[f[n],p_/;MemberQ[p,Length[p]]| | MemberQ[p,d[p]]],{n,0,z}](*A241381号*)
|