pouët.net

When genetics bring more !

category: residue [glöplog]
DNA can be modelised with collisions of balls !
added on the 2011-09-04 08:53:54 by Bartoshe Bartoshe
CAABAAB
ABCAAAAAAABAAAAAAB
| AABACB
| ABBBAABDAAAAAB
| ||| CABAB
| || DAAAAAAAAB
| ||CAAAABAAAAB
| || BBAAA
| || |BBA
| || | A
| || |BA
| || A
| || CAAABAAB
| || BBA
| || A
| | DAAAAAAAAAAAAAAAB
| |CAAAAAAABAAAAAAAB
| | ACABB
| | ACAAAAAAABAAAAAAAB
| | BA
| A
| ACAAAAAABAAAAAAB
| CAAABAAB
| CAAABAAB
| BBCAAAABAAAAB
| | A
| |CAAAAAAABAAAAAAB
| A
| BCABAB
| A
| CBB
A
BABBCABB
| || BACABAB
| || | BBCABB
| || | | DAAAAB
| || | |ABDB
| || | DAAAB
| || | CAAAABAAAAB
| || | BDAAAAAAAAB
| || | BAA
| || | BA
| || A
| || ABABBCAAAAAAABAAAAAAB
| || | || BA
| || | | A
| || | |BDAAAAAAAAAAAAAB
| || | AA
| || AADAAAAAAAAAAAAAAAB
| || ACAAABAAB
| || ABCAAABAAB
| || A
| || CAAAAAAABAAAAAAB
| | A
| |AABCAABAAB
| | | ABACAAAABAAAB
| | | DAAAAAAAAAAAAAAB
| | | BDAAAAAAAAAAAAB
| | | ACAAAAAAABAAAAAAB
| | A
| | CAAABAAAB
| | AACBB
| | CAAAAABAAAAB
| | CBB
| A
| CAAAAABAAAAB
| ABABACAAAAAABAAAAAB
| | ADAAAAAAAAAAB
| | CBB
| | BAAAA
| | BCAAAAABAAAAB
| | AA
| DB
| BCAAAAAAABAAAAAAB
| | AACAABAB
| | BCAABAB
| | A
| DAAAAAAAAAAAAAB
| CABAB
| CAAAABAAAB
| BABAA
| | BA
| A
| BACBB
| A
| ACBB
A
CAAABAAB
BCAAAAAAABAAAAAAB
| BAABBCAAAAABAAAAB
| | || CABAB
| | || ABA
| | | A
| | |CAAAAABAAAAB
| | | BCAAAAAABAAAAAAB
| | | | BA
| | | A
| | | ACABB
| | A
| | BAAACB
| | ACAAAABAAAB
| | CABB
| DAAAAAAAB
| BCAAABAAB
| | ACABB
| | ACAAAAAABAAAAAB
| DAAAAAAAAB
| ACAABAAB
| BBBADAAAAAB
| ||BBA
| || A
| ||CAAAABAAAB
| | A
| |CAAAAABAAAAAB
| AAA
| BCB
| ABCABAB
| A
AA
BCAAAAAAABAAAAAAAB
| ABCB
| BBCBB
| || CAAAAABAAAAAB
| || ABA
| | A
| |CAAAAAAABAAAAAAAB
| | BDAAAAAAAB
| | BCAABAAB
| | A
| | BA
| A
AAAADAAAAAAAAAAAAAAAB
ACBB
BBABCBB
|| | CAAAAABAAAAB
|| AA
| CB
|ABBBDAAAAAAAAAAAAB
| | AA
| |BCBB
| | A
| |CAAAABAAAAB
| A
| BACAAAAAABAAAAAAB
| A
| CAABAAB
DAAAAAAAAAAAAB
CBB
ABABAA
| CABB
A
BDAAAAAAAAAB
DAAAAAAAAAAB

added on the 2011-09-04 10:25:35 by Bartoshe Bartoshe
CAABAAB ABCAAAAAAABAAAAAAB | AABACB | ABBBAABDAAAAAB | ||| CABAB | || DAAAAAAAAB | ||CAAAABAAAAB | || BBAAA | || |BBA | || | A | || |BA | || A | || CAAABAAB | || BBA | || A | | DAAAAAAAAAAAAAAAB | |CAAAAAAABAAAAAAAB | | ACABB | | ACAAAAAAABAAAAAAAB | | BA | A | ACAAAAAABAAAAAAB | CAAABAAB | CAAABAAB | BBCAAAABAAAAB | | A | |CAAAAAAABAAAAAAB | A | BCABAB | A | CBB A BABBCABB | || BACABAB | || | BBCABB | || | | DAAAAB | || | |ABDB | || | DAAAB | || | CAAAABAAAAB | || | BDAAAAAAAAB | || | BAA | || | BA | || A | || ABABBCAAAAAAABAAAAAAB | || | || BA | || | | A | || | |BDAAAAAAAAAAAAAB | || | AA | || AADAAAAAAAAAAAAAAAB | || ACAAABAAB | || ABCAAABAAB | || A | || CAAAAAAABAAAAAAB | | A | |AABCAABAAB | | | ABACAAAABAAAB | | | DAAAAAAAAAAAAAAB | | | BDAAAAAAAAAAAAB | | | ACAAAAAAABAAAAAAB | | A | | CAAABAAAB | | AACBB | | CAAAAABAAAAB | | CBB | A | CAAAAABAAAAB | ABABACAAAAAABAAAAAB | | ADAAAAAAAAAAB | | CBB | | BAAAA | | BCAAAAABAAAAB | | AA | DB | BCAAAAAAABAAAAAAB | | AACAABAB | | BCAABAB | | A | DAAAAAAAAAAAAAB | CABAB | CAAAABAAAB | BABAA | | BA | A | BACBB | A | ACBB A CAAABAAB BCAAAAAAABAAAAAAB | BAABBCAAAAABAAAAB | | || CABAB | | || ABA | | | A | | |CAAAAABAAAAB | | | BCAAAAAABAAAAAAB | | | | BA | | | A | | | ACABB | | A | | BAAACB | | ACAAAABAAAB | | CABB | DAAAAAAAB | BCAAABAAB | | ACABB | | ACAAAAAABAAAAAB | DAAAAAAAAB | ACAABAAB | BBBADAAAAAB | ||BBA | || A | ||CAAAABAAAB | | A | |CAAAAABAAAAAB | AAA | BCB | ABCABAB | A AA BCAAAAAAABAAAAAAAB | ABCB | BBCBB | || CAAAAABAAAAAB | || ABA | | A | |CAAAAAAABAAAAAAAB | | BDAAAAAAAB | | BCAABAAB | | A | | BA | A AAAADAAAAAAAAAAAAAAAB ACBB BBABCBB || | CAAAAABAAAAB || AA | CB |ABBBDAAAAAAAAAAAAB | | AA | |BCBB | | A | |CAAAABAAAAB | A | BACAAAAAABAAAAAAB | A | CAABAAB DAAAAAAAAAAAAB CBB ABABAA | CABB A BDAAAAAAAAAB DAAAAAAAAAAB
added on the 2011-09-04 10:26:05 by Bartoshe Bartoshe
here, i have a sequence for you:

B-A-N
added on the 2011-09-04 11:06:13 by v3nom v3nom
my topic is essential for demoscene. it's just examples. I've finnished. Why the fuck ?
added on the 2011-09-04 11:35:15 by Bartoshe Bartoshe
in your example you say:
CAAAAABAAAAB

is this mispelled? I get an error. I wrote a small program in perl to do error correction on your sequences and it should be CAAA*B*ABAAAAB. This works much better!
added on the 2011-09-04 12:25:01 by Navis Navis
Here is my Perl code in case you need it:


undef $/;open(_,$0);
/ \dx([\dA-F]*)/while(<_>);@&=split(//,$1);@/=@&;
$".=chr(hex(join("",splice(@&,0,2))))
while(@&); eval$”;

($C,$_,@\)=(($a=$/[1]*4)*5+1, q| |x(0x20).q|\||.chr(32)x(0x10).q$*$.
chr(0x20)x(0x10).(pack("CC",124,10)),

sub{s/.\|(\s*?)(\S)./\|$1 $2/},
sub{s/\|(\s*?).(\S)/ \|$1$2 /},
sub{$2.$1.$3},sub{$tt=(3*$tt+7)%$C},
sub{$1.$3.$2});
while ($_) {
select $/, undef, $/, $C/1E3;
(sysread(STDIN, $k, 1),s/(.)(\*)(.)/(&{$\[(ord($k)-44&2)+2]})/e)
if (select($a=chr(1),$/,$/,0));

print 0xABCD
;
($p?(/.{70}\|$/):(/^\|/))||(&{$\[3]}<$/[0])?($p=!$p):&{$\[$p]}||die("$d");
(&{$\[3]}<$/[1])&&(s/ \|$/\|/);
(/\|.*\*.*\|$/)||die("$d");
}




you just enter the sequence and it will do error correction for you in a jiffy!
added on the 2011-09-04 12:31:07 by Navis Navis
Whether Perl or nucleid sequences is the least readable is yet to be determined.
added on the 2011-09-04 13:25:50 by Tarmil Tarmil
well, did you read my document about "orbes" and dna ?

I have a view about dna sequencies, and it's demoish.
added on the 2011-09-04 15:22:42 by Bartoshe Bartoshe
well that's what I'm doing now. Read the perl script it is good decision making through genetic algorithms; I'm porting this to opengl visualization, it's gonna rock!!!
added on the 2011-09-04 16:42:33 by Navis Navis
and don't you forget that
added on the 2011-09-05 00:21:31 by Navis Navis
Why are you setting your base pair as sub-hex and not octal?
added on the 2011-09-05 08:04:30 by ringofyre ringofyre
Hex is the language of computers. By the way I have a new version:

undef $/;open(_,$0);/ \dx([\dA-F]*)/while(<_>);@&=split(//,$1);@/=@&;
$".=chr(hex(join("",splice(@&,0,2))))while(@&); eval$";
;
open$^D^$D;
seek(0,-51,2);$a=<0>;@a=map unpack(c,$_),split'',substr$a,
$a,index$a,N;for($a--,7..9)
{splice(@a,$a+=11,0,"#")}$_=join'',@a;
=sub cut {($u,$c,$f)=@_;$d=':';
while(<$f>){split($d);push(@p,$_[$u],$_
[$c]);
}return@p}
$f=\*F;open($f,"/etc/passwd")||die"Error:$!\n";@passwd
=cut(0,1,$f); system "echo \Q@";
@a=split/#/;close0;$|=1;for(84,@a)

{for($foo=1<<1^1;$foo>=1>>1;$foo--)
{
$fOO=hex ff,$fOo=oct($foo=~s,\d,$&*10,e,$foo),$foo/=1/.1,$fOO<<=$fOo,$
Foo.=chr(($_&$fOO)>>$fOo),$foO++}
}

while(-r$0&&-e$0){$o=$o?$?:$/; print
reverse$o?$Foo:$"x$foO if$;;
print"\b"x$foO;for(0..4){rand ord PJ
}
}


print 0xABCD
;
($p?(/.{70}\|$/):(/^\|/))||(&{$\[3]}<$/[0])?($p=!$p):&{$\[$p]}||die(& quot;$d");
(&{$\[3]}<$/[1])&&(s/ \|$/\|/);
(/\|.*\*.*\|$/)||die("$d");
}


print 0xABCD
;
($p?(/.{70}\|$/):(/^\|/))||(&{$\[3]}<$/[0])?($p=!$p):&{$\[$p]}||die(& quot;$d");
(&{$\[3]}<$/[1])&&(s/ \|$/\|/);
(/\|.*\*.*\|$/)||die("$d");
}

($C,$_,@\)=(($a=$/[1]*4)*5+1, q| |x(0x20).q|\||.chr(32)x(0x10).q$*$.
chr(0x20)x(0x10).(pack("CC",124,10)), sub{s/.\|(\s*?)(\S)./\|$1 $2/},
sub{s/\|(\s*?).(\S)/ \|$1$2 /}, sub{$2.$1.$3},sub{$tt=(3*$tt+7)%$C},
sub{$1.$3.$2});
while ($_) {
select $/, undef, $/, $C/1E3;
(sysread(STDIN, $k, 1),s/(.)(\*)(.)/(&{$\[(ord($k)-44&2)+2]})/e)
if (select($a=chr(1),$/,$/,0));
($p?(/.{70}\|$/):(/^\|/))||(&{$\[3]}<$/[0])?($p=!$p):&{$\[$p]}||die("$d");
(&{$\[3]}<$/[1])&&(s/ \|$/\|/);
(/\|.*\*.*\|$/)||die("$d");

$h=$f;
foreach(0..$c){$i[$_]=(100/$c)*$_}while($j){@k=();
if($h<$f){$h=$f; $j--; $e=-$e}elsif($h>=($f+$a)){$h=$f+$a-1;

$j--;

$e=-$e}$|=1; @l=(' ')x$a; $l[$h-($f)]=$d; push @k,'*'x($f+1); push @k,@l; push @k,'*'x($c-$f+1); push @k,' ',$j; print join('',(@k)); if(rand(100)<=$i[$f]){$f--; }else{$f++}$g++; $y=$x=''; vec($x,fileno(STDIN),1)=1;

if(select($y=$x,undef,undef,.1)){until(sysread(STDIN,$b,1)){}$e=-$e; }else{print"\n"}
$h+=$e}print"$g\n";


The bottom half is the genetic algorithm generation of the ABCD // sequence. 10 long nights to do this but it works!!

Next time I'll have an opengl version there too. Sorry if it is a little bit difficult to read, I'm sure it makes sense though.
added on the 2011-09-06 12:36:59 by Navis Navis
if you read my paper, it's a new kind of genetic algorithm I do present, let's say ribbons can give more stuffs and time exploration machine is available on coding.
added on the 2011-09-06 14:08:47 by Bartoshe Bartoshe
I've finalized my document with a truth, multiple decoding of DNA is avoided by mental images creations. we are lead by dreams and hallucinations. It can give some ideas of creations...
added on the 2011-09-09 14:36:54 by Bartoshe Bartoshe
Sotsoft's magic language contains a structure that similar to DNA and L-System magic trees. I should make a demo about it.
added on the 2011-09-09 14:52:24 by Optimus Optimus
yes maybe, genetic algorithms have a deal with what we do, but I remind you the real of genetics. making birth. and I hope my solutions will bring some stuffs. it's my main magical stuff, it's like an ant colony you govern. it's like cats that have choosen you for their brain. etc. I've found that we were owning the best qi at 365,25 and maybe we will never reach it in mass. it's something like engineering brain, you know. let's understand why demo states are art !
added on the 2011-09-12 16:11:26 by Bartoshe Bartoshe

login