login
A248033
Least number k such that k + n divides F(n)^2 + F(k)^2.
0
1, 3, 2, 1, 5, 19, 18, 17, 16, 3, 14, 12, 4, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1, 25, 99, 98, 9, 36, 95, 94, 93, 92, 91, 90, 12, 88, 23, 50, 10, 68, 83, 22, 81, 80, 79, 11, 24, 76, 15, 74, 73, 5, 71, 18, 29, 8, 67, 66, 12, 28, 63, 62, 1, 20, 47, 58, 41, 56, 40, 54, 17, 24, 11, 50, 49, 48
OFFSET
1,2
COMMENTS
F(n) denotes the n-th Fibonacci number. I believe a(n) exists for all n > 0.
PROG
(PARI)
a(n)=m=1; while((fibonacci(n)^2+fibonacci(m)^2)%(m+n), m++); m
vector(100, n, a(n))
CROSSREFS
KEYWORD
nonn
AUTHOR
Derek Orr, Sep 29 2014
STATUS
approved