cp's OEIS Frontend

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.

A225531 Number of ordered pairs (i, j) with i, j >= 0, i + j <= n and gcd(i, j) <= 1.

This page as a plain text file.
%I A225531 #17 Jul 09 2024 08:55:38
%S A225531 1,3,4,6,8,12,14,20,24,30,34,44,48,60,66,74,82,98,104,122,130,142,152,
%T A225531 174,182,202,214,232,244,272,280,310,326,346,362,386,398,434,452,476,
%U A225531 492,532,544,586,606,630,652,698,714,756,776
%N A225531 Number of ordered pairs (i, j) with i, j >= 0, i + j <= n and gcd(i, j) <= 1.
%C A225531 This sequence is in reply to an extension request made in A100449.
%C A225531 Note that gcd(0,m) = m for any m.
%H A225531 Robert Price, <a href="/A225531/b225531.txt">Table of n, a(n) for n = 0..400</a>
%t A225531 f[n_] := Length[Complement[Union[Flatten[Table[If[i + j <= n && GCD[i, j] <= 1, {i, j}], {i, 0, n}, {j, 0, n}], 1]], {Null}]]; Table[f[n], {n, 0, 100}]
%o A225531 (PARI) alist(N) = my(c=2); vector(N, i, if(1==i, 1, c+=eulerphi(i-1))); \\ _Ruud H.G. van Tol_, Jul 09 2024
%Y A225531 Cf. A018805, A027430, A100448, A100449, A100450, A213207, A213208, A213212, A213213.
%K A225531 nonn,easy
%O A225531 0,2
%A A225531 _Robert Price_, May 09 2013