- Array[p = Log@Pi; {#, {Ceiling[#/p], Floor[#/(p - 1)]}} &, 100]
复制代码
{{1,{1,6}},{2,{2,13}},{3,{3,20}},{4,{4,27}},{5,{5,34}},{6,{6,41}},{7,{7,48}},{8,{7,55}},{9,{8,62}},{10,{9,69}},{11,{10,76}},{12,{11,82}},{13,{12,89}},{14,{13,96}},{15,{14,103}},{16,{14,110}},{17,{15,117}},{18,{16,124}},{19,{17,131}},{20,{18,138}},{21,{19,145}},{22,{20,152}},{23,{21,158}},{24,{21,165}},{25,{22,172}},{26,{23,179}},{27,{24,186}},{28,{25,193}},{29,{26,200}},{30,{27,207}},{31,{28,214}},{32,{28,221}},{33,{29,228}},{34,{30,234}},{35,{31,241}},{36,{32,248}},{37,{33,255}},{38,{34,262}},{39,{35,269}},{40,{35,276}},{41,{36,283}},{42,{37,290}},{43,{38,297}},{44,{39,304}},{45,{40,310}},{46,{41,317}},{47,{42,324}},{48,{42,331}},{49,{43,338}},{50,{44,345}},{51,{45,352}},{52,{46,359}},{53,{47,366}},{54,{48,373}},{55,{49,380}},{56,{49,386}},{57,{50,393}},{58,{51,400}},{59,{52,407}},{60,{53,414}},{61,{54,421}},{62,{55,428}},{63,{56,435}},{64,{56,442}},{65,{57,449}},{66,{58,456}},{67,{59,462}},{68,{60,469}},{69,{61,476}},{70,{62,483}},{71,{63,490}},{72,{63,497}},{73,{64,504}},{74,{65,511}},{75,{66,518}},{76,{67,525}},{77,{68,532}},{78,{69,538}},{79,{70,545}},{80,{70,552}},{81,{71,559}},{82,{72,566}},{83,{73,573}},{84,{74,580}},{85,{75,587}},{86,{76,594}},{87,{77,601}},{88,{77,608}},{89,{78,614}},{90,{79,621}},{91,{80,628}},{92,{81,635}},{93,{82,642}},{94,{83,649}},{95,{83,656}},{96,{84,663}},{97,{85,670}},{98,{86,677}},{99,{87,684}},{100,{88,690}}} |