# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a352707 Showing 1-1 of 1 %I A352707 #16 Apr 19 2022 07:45:45 %S A352707 1,2,2,4,1,4,6,1,3,6,10,3,1,5,7,12,7,1,3,6,8,16,9,5,1,4,7,10,18,13,7, %T A352707 3,2,5,9,12,22,15,11,5,2,3,7,11,13,28,19,13,9,4,1,5,9,12,14,30,25,17, %U A352707 11,8,3,1,7,10,13,16,36,27,23,15,10,7,1,3,8,11,15,18 %N A352707 Array read by ascending antidiagonals T(n,k) = abs(prime(n)-nonprime(k)). %F A352707 T(n,1) = A006093(n). %e A352707 First few rows of array: %e A352707 1 2 4 6 7 8 10 %e A352707 2 1 3 5 6 7 9 %e A352707 4 1 1 3 4 5 7 %e A352707 6 3 1 1 2 3 5 %e A352707 10 7 5 3 2 1 1 %e A352707 12 9 7 5 4 3 1 %e A352707 16 13 11 9 8 7 5 %o A352707 (PARI) nonprime(n) = my(a=1, b=n); while(a!=b, a=b; b=n+primepi(a)); b; \\ A018252 %o A352707 T(n,k) = abs(prime(n)-nonprime(k)); %Y A352707 Cf. A000040 (primes), A018252 (nonprimes), A006093. %K A352707 nonn,tabl %O A352707 1,2 %A A352707 _Michel Marcus_, Apr 19 2022 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE