Anonymous user
Feigenbaum constant calculation: Difference between revisions
m
→{{header|J}}
m (→{{header|J}}) |
|||
Line 634:
=={{header|J}}==
<pre>
Feigenbaum =: conjunction define NB. use: n Feigenbaum m
irange=: <. + i.@:>:@:|@:- NB. inclusive range
a=. 0 1
Line 650:
end.
a=. a , tmp
delta=. delta , %/@:(-/"1) (- 2 3 ,: 1 2)
end.
2 14j6 14j6 ": (#\ i. # delta) ,. (}. a) ,. delta
|