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.

A086992 Product of nonzero digits in n-th row of Pascal's triangle.

This page as a plain text file.
%I A086992 #22 Dec 15 2017 17:36:33
%S A086992 1,1,2,9,96,25,1800,44100,103219200,3869835264,128000,104976000000,
%T A086992 3071875232563200,7050692013745766400,626913312768,
%U A086992 332150625000000000000,1292730125539029811200
%N A086992 Product of nonzero digits in n-th row of Pascal's triangle.
%e A086992 a(6) = 25 because the digits in the 5th row of Pascal's triangle are 1,5,(1,0),(1,0),5,1, the product of the nonzero terms is 25. - _Richard M. Green_, Feb 12 2014
%t A086992 A086992[n_]:= Times @@ DeleteCases[0]@Flatten@IntegerDigits@Table[Binomial[n, k], {k, 0, n}] (* _JungHwan Min_, Dec 07 2015 *)
%o A086992 (PARI) A051801(n)=my(v=select(k->k>1, digits(n))); prod(i=1, #v, v[i])
%o A086992 a(n)=prod(k=1,(n-1)\2,A051801(binomial(n,k)))^2*if(n%2,1,A051801(binomial(n,n/2))) \\ _Charles R Greathouse IV_, Dec 08 2015
%Y A086992 Cf. A007318, A066600, A086993, A051801.
%K A086992 base,easy,nonn
%O A086992 1,3
%A A086992 _Jason Earls_, Jul 29 2003