Fibonacci word: Difference between revisions
Content added Content deleted
Thundergnat (talk | contribs) m (→{{header|Ring}}: Remove vanity tags) |
Alextretyak (talk | contribs) (Added 11l) |
||
Line 25: | Line 25: | ||
* [[Entropy/Narcissist]] |
* [[Entropy/Narcissist]] |
||
<br><br> |
<br><br> |
||
=={{header|11l}}== |
|||
{{trans|Python}} |
|||
<lang 11l>F entropy(s) |
|||
I s.len <= 1 |
|||
R 0.0 |
|||
V lns = Float(s.len) |
|||
V count0 = s.count(‘0’) |
|||
R -sum((count0, s.len - count0).map(count -> count / @lns * log(count / @lns, 2))) |
|||
V fwords = [String(‘1’), ‘0’] |
|||
print(‘#<3 #10 #<10 #.’.format(‘N’, ‘Length’, ‘Entropy’, ‘Fibword’)) |
|||
L(n) 1..37 |
|||
L fwords.len < n |
|||
fwords [+]= (fwords[(len)-2 ..][(0..).step(-1)]).join(‘’) |
|||
V v = fwords[n - 1] |
|||
print(‘#3.0 #10.0 #2.7 #.’.format(n, v.len, entropy(v), I v.len < 56 {v} E ‘<too long>’))</lang> |
|||
{{out}} |
|||
<pre> |
|||
N Length Entropy Fibword |
|||
1 1 0.0000000 1 |
|||
2 1 0.0000000 0 |
|||
3 2 1.0000000 01 |
|||
4 3 0.9182958 010 |
|||
5 5 0.9709506 01001 |
|||
6 8 0.9544340 01001010 |
|||
7 13 0.9612366 0100101001001 |
|||
8 21 0.9587119 010010100100101001010 |
|||
9 34 0.9596869 0100101001001010010100100101001001 |
|||
10 55 0.9593160 0100101001001010010100100101001001010010100100101001010 |
|||
11 89 0.9594579 <too long> |
|||
12 144 0.9594038 <too long> |
|||
13 233 0.9594244 <too long> |
|||
14 377 0.9594165 <too long> |
|||
15 610 0.9594196 <too long> |
|||
16 987 0.9594184 <too long> |
|||
17 1597 0.9594188 <too long> |
|||
18 2584 0.9594187 <too long> |
|||
19 4181 0.9594187 <too long> |
|||
20 6765 0.9594187 <too long> |
|||
21 10946 0.9594187 <too long> |
|||
22 17711 0.9594187 <too long> |
|||
23 28657 0.9594187 <too long> |
|||
24 46368 0.9594187 <too long> |
|||
25 75025 0.9594187 <too long> |
|||
26 121393 0.9594187 <too long> |
|||
27 196418 0.9594187 <too long> |
|||
28 317811 0.9594187 <too long> |
|||
29 514229 0.9594187 <too long> |
|||
30 832040 0.9594187 <too long> |
|||
31 1346269 0.9594187 <too long> |
|||
32 2178309 0.9594187 <too long> |
|||
33 3524578 0.9594187 <too long> |
|||
34 5702887 0.9594187 <too long> |
|||
35 9227465 0.9594187 <too long> |
|||
36 14930352 0.9594187 <too long> |
|||
37 24157817 0.9594187 <too long> |
|||
</pre> |
|||
=={{header|Ada}}== |
=={{header|Ada}}== |