1，1

n=1..41的n，a（n）表。

SequencePosition[Table[If[SequenceCount[IntegerDigits[n]，{1，5}]>0 | | SequenceCount[IntegerDigits[n]，{5，1}]>0，1，0]，{0，1}][[All，2]]（*需要Mathematica版本10或更高版本*）(*哈维·P·戴尔2020年12月15日*）

上下文顺序：A098831号 A265039 A039405号*A044008号 A201054号 A009962号

相邻序列：A043225 A043226号 A043227*A043229 A043230 A043231

不,基础

克拉克·金伯利

经核准的