cp's OEIS Frontend

A181149 a(n) = prime(n)^3 + prime(n)^2 + prime(n).

%I A181149 #37 Mar 23 2023 17:34:00
%S A181149 14,39,155,399,1463,2379,5219,7239,12719,25259,30783,52059,70643,
%T A181149 81399,106079,151739,208919,230763,305319,363023,394419,499359,578759,
%U A181149 712979,922179,1040603,1103439,1236599,1307019
%N A181149 a(n) = prime(n)^3 + prime(n)^2 + prime(n).
%C A181149 a(n) is semiprime just when prime(n) is in A053182. - _Charles R Greathouse IV_, Apr 23 2022
%H A181149 Ivan Panchenko, <a href="/A181149/b181149.txt">Table of n, a(n) for n = 1..1000</a>
%F A181149 a(n) = A135178(n) + A000040(n). - _Elmo R. Oliveira_, Mar 22 2023
%e A181149 a(4)=399 because the 4th prime is 7, 7^3 = 343, 7^2 = 49, and 343 + 49 + 7 = 399.
%p A181149 A181149 := n -> map (p -> p^(3)+p^(2)+p, ithprime(n)):
%p A181149 seq (A181149(n), n=1..40);
%t A181149 #^3+#^2+#&/@Prime[Range[30]] (* _Harvey P. Dale_, Aug 13 2013 *)
%o A181149 (Magma) [p^3+p^2+p: p in PrimesUpTo(500)] // _Vincenzo Librandi_, Jan 26 2011
%o A181149 (PARI) a(n,p=prime(n))=p^3+p^2+p \\ _Charles R Greathouse IV_, Apr 23 2022
%Y A181149 Cf. p: A000040; p^2: A001248; p^3: A030078; p^2+p: A036690; p^3+p^2: A135178.
%K A181149 nonn,easy
%O A181149 1,1
%A A181149 _Jani Melik_, Jan 24 2011