cp's OEIS Frontend

A248843 Table read by rows in which row n lists divisors of (p^p-1)/(p-1) where p = prime(n).

%I A248843 #30 Feb 16 2025 08:33:23
%S A248843 1,3,1,13,1,11,71,781,1,29,4733,137257,1,15797,1806113,28531167061,1,
%T A248843 53,264031,1803647,13993643,95593291,476218721057,25239592216021,1,
%U A248843 10949,1749233,2699538733,19152352117,29557249587617,4722122236541789
%N A248843 Table read by rows in which row n lists divisors of (p^p-1)/(p-1) where p = prime(n).
%H A248843 Samuel S. Wagstaff, <a href="http://dx.doi.org/10.1090/S0025-5718-96-00683-7">Aurifeuillian Factorizations and the Period of the Bell Numbers</a>, Math. Comp. 65 (1996), 383-391.
%H A248843 Eric Weisstein's MathWorld, <a href="https://mathworld.wolfram.com/BellNumber.html">Bell Number</a>
%H A248843 Wikipedia, <a href="http://en.wikipedia.org/wiki/Bell_number">Bell Number</a>
%e A248843 Table begins:
%e A248843   [1, 3],
%e A248843   [1, 13],
%e A248843   [1, 11, 71, 781],
%e A248843   [1, 29, 4733, 137257],
%e A248843   [1, 15797, 1806113, 28531167061],
%e A248843   [1, 53, 264031, 1803647, 13993643, 95593291, 476218721057, 25239592216021],
%e A248843   ...
%t A248843 Table[p = Prime[n]; Divisors[(p^p - 1)/(p - 1)], {n, 1, 10}] // Flatten
%Y A248843 Cf. A000110, A001039, A054767, A125135, A214810, A214811, A214812.
%K A248843 nonn,tabf
%O A248843 1,2
%A A248843 _Jean-François Alcover_, Dec 03 2014