(*seznam lidskych genu*)
gd=GenomeData[]

(*kolik jich je*)
Length[gd]

(*na jakem chromozomu je gen HBB*)
GenomeData["HBB","Chromosome"]

(*jak vypada gen HBB*)
hbb=GenomeData["HBB"]

(*prvnich 74 nukleotidu*)
StringTake[hbb,74]

(* kdyz misto predposledniho A bude T, tak srpkovita anemie *)