A317048 Numbers k such that both k and k + 2 are consecutive deficient numbers.
5, 11, 17, 19, 23, 27, 29, 35, 39, 41, 47, 53, 55, 59, 65, 69, 71, 77, 79, 83, 87, 89, 95, 99, 101, 103, 107, 111, 113, 119, 125, 131, 137, 139, 143, 149, 155, 159, 161, 167, 173, 175, 179, 185, 191, 195, 197, 199, 203, 207, 209, 215, 219, 221, 223, 227, 233
Offset: 1
Keywords
Links
- Muniru A Asiru, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
GAP
A:=Filtered([1..300],k->Sigma(k)<2*k);; a:=List(Filtered([1..Length(A)-1],i->A[i+1]-A[i]=2),j->A[j]);
-
Maple
with(numtheory): A:=select(k->sigma(k)<2*k,[$1..300]): a:=seq(A[i],i in select(k->A[k+1]-A[k]=2,[$1..nops(A)-1]));