login
Indices of record values in A046641
1

%I #3 Jul 14 2012 11:32:21

%S 1,2,3,4,9,12,13,17,20,32,34,39,51,54,102,126,144,163,247,258,306,326,

%T 489,563,613,657,1112,1123,1334,1409,1913,2494,2518,2703,3548,3672,

%U 3798,4481,5905,6014,6186,6581,6759,8543,8893,9453,11892,12708,15346,17183

%N Indices of record values in A046641

%C Indices k such that A046641(k) > A046641(m) for all m < k. Computed using the C program for A046641.

%o (Other) (* sh *) i=1; c=1; m=0; while [ $c -le 50 ]; do if [ `./A046641 $i` -gt $m ]; then m=`./A046641 $i`; echo -n $i", "; c=`expr $c + 1`; fi; i=`expr $i + 1`; done

%Y A145771(n) = A046641( a(n)) gives the corresponding record values.

%K nonn

%O 1,2

%A _M. F. Hasler_, Oct 18 2008