A382247 Number of fixed points of solid partitions under twice the 'time-lapse' operation.
1, 0, 2, 2, 3, 4, 7, 12, 16, 22, 32, 50, 68, 96, 134, 195, 261, 364, 497, 701, 941, 1288, 1738
Offset: 1
Examples
z[{{2},{2}}] -> z[{{1,1}},{{1,1}}] -> z[{{2},{2}}] under the 'lapse' operation.
Links
- Wouter Meeussen, Mma functions for plane and solid partitions
Crossrefs
Programs
-
Mathematica
Tr/@Table[Count[solidformBTK[par], arg_z/; Nest[lapse,arg,2]===arg], {n, 20}, {par, IntegerPartitions[n]}]
Comments