RosettaCodeData/Task/Hofstadter-Q-sequence/Julia/hofstadter-q-sequence-2.julia
2018-06-22 20:57:24 +00:00

3 lines
113 B
Text

seq = hofstQseq(1:100_000)
cnt = count(diff(seq) .< 0)
println("$cnt elements are less than the preceding one.")