cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A101172 Sequence whose Mobius transform leads to the first differences of the terms.

This page as a plain text file.
%I A101172 #11 May 02 2025 01:32:36
%S A101172 1,2,3,5,8,15,26,51,97,191,373,745,1472,2943,5859,11708,23365,46729,
%T A101172 93349,186697,373200,746372,1492370,2984739,5968687,11937366,23873259,
%U A101172 47746421,95489896,190979791,381953529,763907057,1527802406,3055604437,6111185508
%N A101172 Sequence whose Mobius transform leads to the first differences of the terms.
%C A101172 In the example, the last value in the Mobius transform of [1,2,3,5,8] is 7 and so the next term in our sequence is 8+7=15. Then, the Mobius transform of [1,2,3,5,8,15] is [1,1,2,3,7,11], which means that the next term of our sequence is 15+11=26, etc.
%e A101172 For example, the Mobius transform of the segment [1,2,3,5,8] begins [1,1,2,3], which are the first differences of these terms.
%p A101172 with(numtheory): F:={1}: f:=n->F[n]: g:=n->sum(mobius(divisors(n)[j])*f(n/divisors(n)[j]),j=1..tau(n)): for n from 1 to 35 do F:=F union {F[nops(F)]+g(n)} od: G:=sort(convert(F,list)); # _Emeric Deutsch_, Feb 15 2005
%K A101172 easy,nonn
%O A101172 1,2
%A A101172 Mark Hudson (mrmarkhudson(AT)hotmail.com), Dec 03 2004
%E A101172 Corrected and extended by _Emeric Deutsch_, Feb 15 2005
%E A101172 a(33) onward corrected by _Sean A. Irvine_, May 01 2025