Tuesday, January 27, 2015

Turing Head and Random Process Evolution 

1
2
3
4
5
6
7
8
s='0101011010210212102201'
while(True==True):
    if ((s[a])= '1'):
        a=a+1
    if ((s[a])= '0'):
        a=a-1
    if ((s[a])= '2'):
        print(s[a-1]


And the selection pressure being O(f(n)+k).


 




 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13


    Sub Main()
        Dim s As String ="01212012021002112021201"
        Dim r As New Random


        Dim sb As New StringBuilder
        For i As Integer = 1 To (Int.Text)
            Dim idx As Integer = r.Next(0, 62)
            sb.Append(s.Substring(idx, 1))
            TextBox1.Text = sb.ToString


        Next

































Posted by



at


































No comments:















Post a Comment


















        

      









Subscribe to:
Post Comments (Atom)