Skip to content
Snippets Groups Projects
Commit d0ba58d3 authored by Tiago Grego's avatar Tiago Grego
Browse files

variation data object updated

parent 4a58b67f
No related branches found
No related tags found
2 merge requests!83ancestral_allele update,!83ancestral_allele update
Hide whitespace changes
Inline Side-by-side
modules/t/vcf_serializer.t
+ 3
− 3
View file @ d0ba58d3
...@@ -89,8 +89,7 @@ foreach my $var (@vars) { ...@@ -89,8 +89,7 @@ foreach my $var (@vars) {
my $var_d = $var_data{$var}; my $var_d = $var_data{$var};
my $var_obj = Bio::EnsEMBL::Variation::Variation->new( my $var_obj = Bio::EnsEMBL::Variation::Variation->new(
-NAME => $var, -NAME => $var
-ANCESTRAL_ALLELE => $var_d->{'aa'}
); );
#my %sample_genotypes = (); #my %sample_genotypes = ();
...@@ -112,7 +111,8 @@ foreach my $var (@vars) { ...@@ -112,7 +111,8 @@ foreach my $var (@vars) {
-VARIATION_NAME => $var, -VARIATION_NAME => $var,
-MINOR_ALLELE => $var_d->{'ma'}, -MINOR_ALLELE => $var_d->{'ma'},
-MINOR_ALLELE_FREQUENCY => $var_d->{'maf'}, -MINOR_ALLELE_FREQUENCY => $var_d->{'maf'},
-MINOR_ALLELE_COUNT => $var_d->{'mac'} -MINOR_ALLELE_COUNT => $var_d->{'mac'},
-ANCESTRAL_ALLELE => $var_d->{'aa'}
); );
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment