Data commit
This commit is contained in:
parent
7387c8f97b
commit
cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
17
Task/Evolutionary-algorithm/APL/evolutionary-algorithm.apl
Normal file
17
Task/Evolutionary-algorithm/APL/evolutionary-algorithm.apl
Normal file
|
|
@ -0,0 +1,17 @@
|
|||
evolve←{
|
||||
⍺←0.1
|
||||
target←'METHINKS IT IS LIKE A WEASEL'
|
||||
charset←27↑⎕A
|
||||
fitness←{target+.=⍵}
|
||||
mutate←⍺∘{
|
||||
(⍺>?(⍴target)/0){
|
||||
⍺:(?⍴charset)⊃charset
|
||||
⍵
|
||||
}¨⍵
|
||||
}
|
||||
⍵{
|
||||
target≡⎕←⍵:⍵
|
||||
next←mutate¨⍺/⊂⍵
|
||||
⍺∇(⊃⍒fitness¨next)⊃next
|
||||
}charset[?(⍴target)/⍴charset]
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue