A383197
Number of positive integers with n digits in which adjacent digits differ by at most 2.
Original entry on oeis.org
9, 41, 188, 867, 4010, 18574, 86096, 399225, 1851529, 8587802, 39833891, 184770640, 857073208, 3975623218, 18441391129, 85542653145, 396800342804, 1840608838251, 8537899488042, 39604141848678, 183708898915088, 852157340908409, 3952841397780937, 18335763176322738
Offset: 1
A383199
Number of positive integers with n digits in which adjacent digits differ by at most 4.
Original entry on oeis.org
9, 65, 475, 3465, 25282, 184463, 1345887, 9819916, 71648478, 522764591, 3814216651, 27829445433, 203050351876, 1481504383412, 10809413614854, 78868091114176, 575440631436879, 4198553757680021, 30633661742154286, 223510591001999469, 1630787227154056312
Offset: 1
-
Rest[CoefficientList[Series[-x*(x^4-x^3-7*x^2+2*x+9)/(x^5-x^4-6*x^3+3*x^2+7*x-1),{x,0,21}],x]] (* or *) LinearRecurrence[{7,3,-6,-1,1},{9,65,475,3465,25282},21] (* James C. McMahon, May 01 2025 *)
A383200
Number of positive integers with n digits in which adjacent digits differ by at most 5.
Original entry on oeis.org
9, 74, 610, 5020, 41317, 340050, 2798709, 23034169, 189577752, 1560278726, 12841536934, 105689495131, 869854553902, 7159149960981, 58921836913893, 484943447787706, 3991222267830858, 32848892512931768, 270355712339865433, 2225104276073281126, 18313239977617203949
Offset: 1
-
Rest[CoefficientList[Series[-x*(2*x^4-x^3-9*x^2+2*x+9)/((x+1)*(2*x^4-3*x^3-6*x^2+9*x-1)),{x,0,21}],x]] (* or *) LinearRecurrence[{8,3,-9,-1,2},{9,74,610,5020,41317},21] (* James C. McMahon, May 08 2025 *)
A383201
Number of positive integers with n digits in which adjacent digits differ by at most 6.
Original entry on oeis.org
9, 81, 724, 6472, 57851, 517112, 4622299, 41317257, 369321783, 3301249634, 29508817638, 263769909867, 2357755102376, 21075220921085, 188384678470177, 1683910560899833, 15051939468415328, 134544486519385896, 1202650255852445247, 10750107085908359068
Offset: 1
A383202
Number of positive integers with n digits in which adjacent digits differ by at most 7.
Original entry on oeis.org
9, 86, 813, 7693, 72786, 688661, 6515721, 61648078, 583279341, 5518660133, 52214449434, 494023669525, 4674173312097, 44224391459894, 418426247682381, 3958913146568317, 37457003208767394, 354397037125653845, 3353104871295311673, 31725187008033469918
Offset: 1
-
Rest[CoefficientList[Series[-x*(6*x^2-5*x-9)/(6*x^3-5*x^2-9*x+1),{x,0,20}],x]] (* or *) LinearRecurrence[{9,5,-6},{9,86,813},20] (* James C. McMahon, May 07 2025 *)
Showing 1-5 of 5 results.