sub getTheFirst{
	my $this = shift;
	return @{$this->{individual}}[0]->getDNA();
}