This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A290959 #13 Aug 16 2017 23:48:02 %S A290959 1,2,3,5,7,11,13,17,20,24,26,32,34,38,42,47,49,55,57,63,67,71,73,81, %T A290959 84,88 %N A290959 Matrix rank of the number of dots in the pairwise intersections of Ferrers diagrams. %C A290959 Let f(q, r) be the number of dots in the intersection of the Ferrers diagrams of the integer partitions q and r of n. Let a(n) be the matrix rank of the p(n) by p(n) matrix of f(q, r) as q and r range over the partitions of n. Conjecture: For n > 3, a(n+1) - a(n) = A000005(n+2), the number of divisors of n. The same is true empirically for the union, complement, and set difference. Note that A000005 count rectangular partitions. %t A290959 intersection[{p_, q_}] := Module[{min}, %t A290959 min = Min[Length /@ {p, q}]; %t A290959 Total[Min /@ Transpose@{Take[p, min], Take[q, min]}] %t A290959 ]; %t A290959 intersections@k_ := intersections@k = Module[{ip = IntegerPartitions[k]}, %t A290959 Table[intersection@{ip[[m]], ip[[n]]}, {m, PartitionsP@k}, {n, %t A290959 PartitionsP@k}]]; %t A290959 a[n_]:=MatrixRank@intersections@n; %t A290959 Table[MatrixRank@intersections@n, {n, 20}] %Y A290959 Cf. A000005, A218904, A218905, A218906, A218907, A246581. %K A290959 nonn,more %O A290959 1,2 %A A290959 _George Beck_, Aug 14 2017