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.
%I A378493 #16 Dec 12 2024 17:51:53 %S A378493 2,11,41,111,276,549,1025,1709,2744,4339,6385,9271,13002,17517,23157, %T A378493 30365,39392,49823,62553,77463,94326,114313,137221,163921,195446, %U A378493 230897,269831,313273,360688,413233,476225,545393,622250,704955,798825,899391,1009762 %N A378493 Dot product of the first n primes and the first n triangular numbers. %H A378493 Alois P. Heinz, <a href="/A378493/b378493.txt">Table of n, a(n) for n = 1..10000</a> (first 1000 terms from Harvey P. Dale) %F A378493 a(n) mod 2 = A166486(n-1). %e A378493 a(3) = dot product of {2,3,5} and {1,3,6} = 2*1+3*3+5*6 = 41. %p A378493 a:= proc(n) option remember; `if`(n<1, 0, %p A378493 a(n-1)+ithprime(n)*n*(n+1)/2) %p A378493 end: %p A378493 seq(a(n), n=1..37); # _Alois P. Heinz_, Nov 28 2024 %t A378493 Table[Prime[Range[n]].Accumulate[Range[n]],{n,50}] %Y A378493 Partial sums of A196421. %Y A378493 Cf. A000040, A000217, A166486. %K A378493 nonn %O A378493 1,1 %A A378493 _Harvey P. Dale_, Nov 28 2024