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.
%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