cp's OEIS Frontend

A251720 a(n) = (p_n)^2 * p_{n+1}, where p_n is the n-th prime, A000040(n).

%I A251720 #13 Apr 28 2016 22:51:34
%S A251720 12,45,175,539,1573,2873,5491,8303,15341,26071,35557,56129,72283,
%T A251720 86903,117077,165731,212341,249307,318719,367993,420991,518003,613121,
%U A251720 768337,950309,1050703,1135163,1247941,1342553,1621663,2112899,2351057,2608891,2878829,3352351
%N A251720 a(n) = (p_n)^2 * p_{n+1}, where p_n is the n-th prime, A000040(n).
%C A251720 Subsequence of A014612: a(1)=12=A014612(2), a(2)=45=A014612(10) - _Zak Seidov_, Apr 26 2016
%H A251720 Harvey P. Dale, <a href="/A251720/b251720.txt">Table of n, a(n) for n = 1..1000</a>
%F A251720 a(n) = A000040(n) * A000040(n) * A000040(n+1).
%F A251720 a(n) = A000040(n) * A006094(n).
%F A251720 a(n) = A001248(n) * A000040(n+1).
%t A251720 a251720[n_Integer] := Prime[#]^2*Prime[# + 1] & /@ Range[n]; a251720[35] (* _Michael De Vlieger_, Dec 14 2014 *)
%t A251720 #[[1]]^2 #[[2]]&/@Partition[Prime[Range[40]],2,1] (* _Harvey P. Dale_, Mar 12 2015 *)
%o A251720 (Scheme, three versions)
%o A251720 (define (A251720 n) (* (A000040 n) (A000040 n) (A000040 (+ 1 n))))
%o A251720 (define (A251720 n) (* (A000040 n) (A006094 n)))
%o A251720 (define (A251720 n) (* (A001248 n) (A000040 (+ n 1))))
%Y A251720 Cf. A000040, A001248, A006094, A250477, A014612, A268733.
%K A251720 nonn
%O A251720 1,1
%A A251720 _Antti Karttunen_, Dec 14 2014