Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #6 Sep 25 2013 11:11:29
%S 16,17,18,123,124,125,126,127,128,129,550,551,552,553,554,555,556,557,
%T 558,559,560,561,562,563,564,1797,1798,1799,1800,1801,1802,1803,1804,
%U 1805,1806,1807,1808,1809,1810,1811,1812,1813,1814,1815,1816,1817,1818
%N Numbers n such that A145445(n) = A145446(n)
%C Numbers n such that s(n), the smallest square > n-th prime, equals q(n), the smallest cube > n-th prime, s(n) = A145445(n), q(n) = A145446(n).
%H Vincenzo Librandi, <a href="/A145449/b145449.txt">Table of n, a(n) for n = 1..1000</a>
%t Do[If[Ceiling[Prime[n]^(1/3)]^3 == Ceiling[Prime[n]^(1/2)]^2,Print[n]],{n,10000}]
%Y A104103, A104147, A145445, A145446, A145447
%K nonn
%O 1,1
%A _Zak Seidov_, Oct 10 2008