Question: NCBI Protein GI to Genome Accession
3
gravatar for Sej Modha
2.1 years ago by
Sej Modha1.5k
Glasgow, UK
Sej Modha1.5k wrote:

I have a list of protein GI and would like to get accession number of the genome (DBSOURCE in genbank file) using Eutilities.

What would be the easiest way to get genome accession numbers for a list of protein GI?

 

eutils sequence ncbi • 2.0k views
ADD COMMENTlink modified 14 months ago • written 2.1 years ago by Sej Modha1.5k
6
gravatar for Sej Modha
14 months ago by
Sej Modha1.5k
Glasgow, UK
Sej Modha1.5k wrote:

An alternative to perl e-util is to use the Unix e-utils. Following one liner does the job! Note that following command would work for accession number as well as GIs as -id parameter in elink command.

elink -db protein -id 817524604 -target nuccore|efetch -format acc
ADD COMMENTlink written 14 months ago by Sej Modha1.5k
4
gravatar for Sej Modha
2.1 years ago by
Sej Modha1.5k
Glasgow, UK
Sej Modha1.5k wrote:

Here is a perl script to do this. This script is explained in detail here: http://bioinformatics.cvr.ac.uk/blog/?p=276

#!/usr/bin/perl

use Bio::DB::EUtilities;

#my @ids     = qw(817524604 726965494);

my $infile = $ARGV[0];

my @ids;

open (IN,"$infile")||die "can't open $infile\n";

while(<IN>)
{
  chomp($_);
  my @ids=$_;
# print @ids."\n";    
  my $factory = Bio::DB::EUtilities->new(-eutil          => 'elink',
                                       -email          => 'mymail@foo.bar',
                                       -db             => 'nucleotide',
                                       -dbfrom         => 'protein',
                                       -correspondence => 1,
                                       -id             => \@ids);
 
  # iterate through the LinkSet objects
  while (my $ds = $factory->next_LinkSet) 
  {
    #print "   Link name: ",$ds->get_link_name,"\n";
    my $protid = join(',',$ds->get_submitted_ids);
    print "Protein ID:" . $protid ."\t";
    #print "Protein ID: ",join(',',$ds->get_submitted_ids),"\t";
    my $nucid = join(',',$ds->get_ids);
    print "Nuc ID:" . $nucid ."\t";
    my $factory = Bio::DB::EUtilities->new(-eutil   => 'efetch',
                           -db      => 'nucleotide',
                                              -id      => $nucid,
                                              -email   => 'mymail@foo.bar',
                                              -rettype => 'acc');
   my @accs = split(m{\n},$factory->get_Response->content);
   print "Genome Accession: " .join(',',@accs), "\n";
   }
}
ADD COMMENTlink written 2.1 years ago by Sej Modha1.5k
3
gravatar for genomax
2.1 years ago by
genomax30k
United States
genomax30k wrote:

For future reference:

There is an interesting file @NCBI which contains information about various accession numbers/gene names: ftp://ftp.ncbi.nlm.nih.gov/gene/DATA/gene2accession.gz

This file is automatically generated everyday and should contain latest information about GeneID's and accession numbers.

ADD COMMENTlink written 2.1 years ago by genomax30k

Just wanted to say thanks for this, this saved me a massive amount of time genomax2!

I threw together a makefile and a small python script to convert the 4.8Gb uncompressed file into a kyoto-cabinet database in case anyone wants it.

ADD REPLYlink written 19 months ago by rasche.eric70
Please log in to add an answer.

Help
Access

Use of this site constitutes acceptance of our User Agreement and Privacy Policy.
Powered by Biostar version 2.3.0
Traffic: 1102 users visited in the last hour