Permutations with fixed points

[Robert Israel]

On Sun, 6 Jan 2008, Maximilian Hasler wrote:

>> Also the statement in A003048:
>>  The termwise sum of this sequence and A000166 gives the factorial
>> numbers - D. G. Rogers, Aug 26 2006
>> Should be moved to the sequence A002467
>
> also, the "Maple" code in A003048 is MATHEMATICA code, AFAICS
> (Maple users dont need that much square brackets, underscores, /@  etc... ;-)
>
> Maximilian

Yes, Maple code would be, for example:

   a:= proc(p) option remember; p*a(p-1)-(-1)^p end proc: a(0):= 1:
   seq(a(p),p=0..19);

Robert Israel                                israel at math.ubc.ca
Department of Mathematics        http://www.math.ubc.ca/~israel 
University of British Columbia            Vancouver, BC, Canada