cp's OEIS Frontend

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.

A169636 Number of permutations of A004001 sequence vectors:a(n)=Length[Permutations[Table[A004001[i], {i, 0, m}]]].

This page as a plain text file.
%I A169636 #4 Jul 22 2025 07:30:47
%S A169636 1,2,3,12,30,180,1260,5040,15120,151200,1663200
%N A169636 Number of permutations of A004001 sequence vectors:a(n)=Length[Permutations[Table[A004001[i], {i, 0, m}]]].
%F A169636 f(n) = f(f(n - 1)) + f(n - f(n - 1));
%F A169636 a(n)=Length[Permutations[Table[f(i), {i, 0, m}]]]
%t A169636 (*A004001*)
%t A169636 f[0] = 0; f[1] = 1; f[2] = 1;
%t A169636 f[n_] := f[n] = f[f[n - 1]] + f[n - f[n - 1]];
%t A169636 a[m_] := Length[Permutations[Table[f[i], {i, 0, m}]]];
%t A169636 b = Table[a[m], {m, 0, 10}]
%K A169636 nonn,uned
%O A169636 0,2
%A A169636 _Roger L. Bagula_, Apr 04 2010