id:A145987 - OEIS Search Results

Search: id:A145987

Displaying 1-1 of 1 results found.

page 1

Prime subtrahends used in sequence under 10^n

+0
2

5, 7, 11, 17, 29, 41, 47, 59, 71, 83, 89, 97, 113, 137, 173, 179, 191, 227, 239, 257, 281, 317, 347, 353, 359, 383, 401, 431, 443, 479, 491, 509, 521, 557, 569, 599, 617, 641, 647, 653, 683, 719, 743, 761, 773, 809, 821, 827, 863, 887, 911, 929, 941, 947, 953 (list; graph; listen)

	OFFSET	`1,1`
	EXAMPLE	`A(13)=113 because 1000-113 = 887 and both 113 and 887 are prime.`
	PROGRAM	`(Other) UBASIC: 10 'complementary primes under 10^n 20 N=3 30 A=3:S=sqrt(N) 40 B=N\A 50 if B*A=N then 140 60 A=A+2 70 if A<=S then 40 90 if N<10 then T=10-N:if T=prmdiv(T) then print T; N; 100 if N>=10 and N<100 then H=100-N:if H=prmdiv(H) then print H; N; 110 if N>=100 and N<1000 then U=1000-N:if U=prmdiv(U) then print U; N; 120 if N>=1000 and N<10000 then V=10000-N:if V=prmdiv(V) then print V; N 130 if N>10000 then stop 131 stop 140 N=N+2:goto 30`
	CROSSREFS	`A145985` `Sequence in context: A027690 A087200 A153118 this_sequence A060449 A046140 A023241` `Adjacent sequences: A145984 A145985 A145986 this_sequence A145988 A145989 A145990`
	KEYWORD	`easy,nonn`
	AUTHOR	`Enoch Haga (Enokh(AT)comcast.net), Oct 27 2008`

page 1

Search completed in 0.002 seconds

Last modified November 29 12:46 EST 2009. Contains 167659 sequences.

AT&T Labs Research