Percolation/Site percolation: Difference between revisions

Added Julia language
(Added Julia language)
(Added Julia language)
Line 1,068:
println("\nFrequencies for $nrep tries that percolate through\n")
for (pi, fi) in zip(p, f)
@printf("p = %.1f ⇛ f = %.2f3f\n", pi, fi)
end</lang>
 
Line 1,074:
<pre>Sample percolation, 15×15 grid, p = 0.40
 
1) A A B # # # A# B B#
2) #A #A AB A A A A A# A B # # #
3) #A # A AB B B A # B # #
4) # B B # # # # B B # #
5) # # B B # #B # # B # # #
6) # # # # B B B # #
7) # # # # # B # # #
8) # # # #B # # B # # #
9) # # # # B B B #
0) # # #B # # B B B# # #
1) # # # # B # B
2) # # # B # # # B B # # #
3) # # # # B # # # # B B B #
4) # # # # # B B # # # B
5) # # B # # # # B #
!) B B
 
Frequencies for 1000 tries that percolate through
 
p = 0.0 ⇛ f = 0.00000
p = 0.1 ⇛ f = 0.00000
p = 0.2 ⇛ f = 0.00000
p = 0.3 ⇛ f = 0.00000
p = 0.4 ⇛ f = 0.01001
p = 0.5 ⇛ f = 0.09089
p = 0.6 ⇛ f = 0.56559
p = 0.7 ⇛ f = 0.96956
p = 0.8 ⇛ f = 1.00000
p = 0.9 ⇛ f = 1.00000
p = 1.0 ⇛ f = 1.00000</pre>
 
=={{header|Perl 6}}==
Anonymous user