search for: gattgcc

...,1) kid<-c(sample(moms[i,2:5],2),sample(dads[rdad,2:5],2)) output_offspring<-rbind(output_offspring,c(moms$SampleID[i],dads $SampleID[rdad],kid)) } write .table (output_offspring,"offspring_7.txt",row.names=T,col.names=T,quote=F) females.txt: SampleID A1 A2 A3 A4 GM920222 GATTGCC GATTGCC GATAGAC GATAGAC GM930040 GTCATCA GAGTGCA ACTATAA GATTGCC GM930040 GTCATCA GAGTGCA ACTATAA GATTGCC GM960023 GATTGCC GTCATCA GATTGCC GATTGCC GM920224 ACTAGAA GTCATCA GTCATCA ACTAGAA GM920224 ACTAGAA GTCATCA GTCATCA ACTAGAA GM920034 GATTGCC GTCATCA GATTGCA GATTGCA GM920096 GATTGCC GATTGCC GATT...

...column will be combined in one column, all the second letters in a second column, all the third ones in a third column and so on, resulting in 7 columns, i.e. for the first individual (GM920222) GGGG AAAA TTTT TTAA GGGG CCAA CCCC ? Thank you very much, Laetitia SampleID A1 A2 A3 A4 GM920222 GATTGCC GATTGCC GATAGAC GATAGAC GM930040 GTCATCA GAGTGCA ACTATAA GATTGCC GM930040 GTCATCA GAGTGCA ACTATAA GATTGCC GM960023 GATTGCC GTCATCA GATTGCC GATTGCC GM920224 ACTAGAA GTCATCA GTCATCA ACTAGAA GM920224 ACTAGAA GTCATCA GTCATCA ACTAGAA GM920034 GATTGCC GTCATCA GATTGCA GATTGCA GM920096 GATTGCC GATTGCC GATT...