IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Bioinformatique Perl Discussion :

OO problème d'écriture


Sujet :

Bioinformatique Perl

  1. #1
    Membre émérite
    Avatar de Jasmine80
    Femme Profil pro
    Bioinformaticienne
    Inscrit en
    Octobre 2006
    Messages
    3 157
    Points
    2 673
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 45
    Localisation : Royaume-Uni

    Informations professionnelles :
    Activité : Bioinformaticienne
    Secteur : Santé

    Informations forums :
    Inscription : Octobre 2006
    Messages : 3 157
    Points : 2 673
    Par défaut OO problème d'écriture
    Objet $hit

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    							  '_annotation' => {
    									     'description' => [
    												bless( {
    													 'value' => 'Staphylococcus aureus subsp. aureus USA300_TCH1516, complete genome',
    													 'tagname' => 'description'
    												       }, 'Bio::Annotation::SimpleValue' )
    											      ],

    Je voudrais récupérer la description (ligne 109 et 110 du code) :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    							my $hit_description = $hit->annotation->description;
    							print "$hit_description\n\n";

    J'obtiens bien la valeur
    Staphylococcus aureus subsp. aureus USA300_TCH1516, complete genome
    mais avec un message me prévenant que
    Using old style annotation call on new Annotation::Collection object
    STACK Bio::Annotation::Collection::description C:/Perl/site/lib/Bio/Annotation/Collection.pm:464
    STACK toplevel BioSearchHSPGenericHSP.pl:109

    Pourriez-vous me dire la façon correcte d'écrire?


    Merci;

  2. #2
    Responsable Perl et Outils

    Avatar de djibril
    Homme Profil pro
    Inscrit en
    Avril 2004
    Messages
    19 820
    Points
    498 771
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Avril 2004
    Messages : 19 820
    Points : 498 771
    Par défaut
    Il nous faut un peu plus de codes

  3. #3
    Membre émérite
    Avatar de Jasmine80
    Femme Profil pro
    Bioinformaticienne
    Inscrit en
    Octobre 2006
    Messages
    3 157
    Points
    2 673
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 45
    Localisation : Royaume-Uni

    Informations professionnelles :
    Activité : Bioinformaticienne
    Secteur : Santé

    Informations forums :
    Inscription : Octobre 2006
    Messages : 3 157
    Points : 2 673
    Par défaut
    Merci de me répondre, j'utilise le module Bio::Tools::Run::RemoteBlast, je commence donc la procédure classique d'un blast en ligne et je récupère les hsp un à un :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    				my $result = $rc->next_result();
     
     
    				$factory->remove_rid($rid);
    				while ( my $hit = $result->next_hit ) {
    					next unless ( $v > 0);
     
    						while( my $hsp = $hit->next_hsp ) {
     
     
    							#---------------------------------------
    							# voir Bio::Search::HSP::GenericHSP
    							#---------------------------------------
     
    							# Returns a SeqFeature representing the query in the HSP
    							my $query = $hsp->query;
     
    							# Returns a SeqFeature representing the hit in the HSP
    							my $hit = $hsp->hit;

    Est-ce plus clair?

  4. #4
    Responsable Perl et Outils

    Avatar de djibril
    Homme Profil pro
    Inscrit en
    Avril 2004
    Messages
    19 820
    Points
    498 771
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Avril 2004
    Messages : 19 820
    Points : 498 771
    Par défaut
    Dans la doc de Bio::SeqFeature::Similarity , on a ceci :
    Title : seqdesc
    Usage : $desc = $obj->seqdesc();
    $obj->seqdesc($desc);
    Function: At present this method is a shorthand for
    $obj->annotation()->description().

    Note that this is not stored in the tag system and hence will
    not be included in the return value of gff_string().
    Returns :
    Args :
    As tu donc essayé plutôt cette écriture :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    my $hit_description = $hit->seqdesc();
    ?

  5. #5
    Membre émérite
    Avatar de Jasmine80
    Femme Profil pro
    Bioinformaticienne
    Inscrit en
    Octobre 2006
    Messages
    3 157
    Points
    2 673
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 45
    Localisation : Royaume-Uni

    Informations professionnelles :
    Activité : Bioinformaticienne
    Secteur : Santé

    Informations forums :
    Inscription : Octobre 2006
    Messages : 3 157
    Points : 2 673
    Par défaut
    Merci pour ton aide, je n'ai maintenant plus le message. Comment as-tu su qu'il fallait regarder dans Bio::SeqFeature::Similarity ... le problème avec blast est que tu te retrouves avec des dizaines d'objets différents et que ça devient vite un jeu de piste pour retrouver ce dont tu as besoin.

  6. #6
    Responsable Perl et Outils

    Avatar de djibril
    Homme Profil pro
    Inscrit en
    Avril 2004
    Messages
    19 820
    Points
    498 771
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Avril 2004
    Messages : 19 820
    Points : 498 771
    Par défaut
    Alors, voici comment s'y prendre. A partir de ton script. La partie m'intéressant est la suivante :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    while( my $hsp = $hit->next_hsp )
    $hit->next_hsp retourne un objet de type Bio::Search::HSP::GenericHSP, j'ai donc regardé la documentation de ce module. Ensuite j'ai cherché la méthode hit. On peut lire ceci :
    hit

    Title : hit
    Usage : my $hit = $hsp->hit
    Function: Returns a SeqFeature representing the hit in the HSP
    Returns : L<Bio::SeqFeature::Similarity>
    Args : [optional] new value to set
    Il retourne un objet de type Bio::SeqFeature::Similarity. Donc $hit est de type Bio::SeqFeature::Similarity. Je vais donc voir la documentation de ce module pour trouver l'explication de la méthode description. Et hop, je trouve la méthode seqdesc

    Voilà. En bioperl, c'est de l'objet à fond et il y a beaucoup d'héritages de classes. Le plus important est donc à chaque fois de savoir qu'elle est le type d'objet qu'une méthode te retourne et ensuite, tu vas lire la documentation adéquate pour trouver les méthodes que tu peux utiliser.
    D'où l'importance de donner un peu plus de code quand tu as un souci

  7. #7
    Membre émérite
    Avatar de Jasmine80
    Femme Profil pro
    Bioinformaticienne
    Inscrit en
    Octobre 2006
    Messages
    3 157
    Points
    2 673
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 45
    Localisation : Royaume-Uni

    Informations professionnelles :
    Activité : Bioinformaticienne
    Secteur : Santé

    Informations forums :
    Inscription : Octobre 2006
    Messages : 3 157
    Points : 2 673
    Par défaut
    Merci c'est très clair maintenant.

  8. #8
    Rédactrice

    Avatar de stoyak
    Profil pro
    Inscrit en
    Juin 2005
    Messages
    408
    Points
    1 491
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2005
    Messages : 408
    Points : 1 491
    Par défaut
    Bioperl demanderait peut-être une doc générale. Pas sur l'utilisation d'un module particulier, mais sur sa construction.
    J'ai moi-même eu à chercher les héritages entre les objets, et la toute première fois, ce n'est pas si simple ...

  9. #9
    Membre émérite
    Avatar de Jasmine80
    Femme Profil pro
    Bioinformaticienne
    Inscrit en
    Octobre 2006
    Messages
    3 157
    Points
    2 673
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 45
    Localisation : Royaume-Uni

    Informations professionnelles :
    Activité : Bioinformaticienne
    Secteur : Santé

    Informations forums :
    Inscription : Octobre 2006
    Messages : 3 157
    Points : 2 673
    Par défaut
    Citation Envoyé par stoyak Voir le message
    Bioperl demanderait peut-être une doc générale. Pas sur l'utilisation d'un module particulier, mais sur sa construction.
    J'ai moi-même eu à chercher les héritages entre les objets, et la toute première fois, ce n'est pas si simple ...
    C'est une très bonne idée

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [PERL] Problème lecture/écriture dans un fichier
    Par LE NEINDRE dans le forum Langage
    Réponses: 4
    Dernier message: 17/08/2005, 14h15
  2. Problème d'écriture dans un fichier xml
    Par vanoou dans le forum C++Builder
    Réponses: 1
    Dernier message: 13/07/2005, 03h28
  3. Problème d'écriture dans un tableau
    Par Hokagge dans le forum MFC
    Réponses: 46
    Dernier message: 08/07/2005, 17h47
  4. problème d'écriture dans la BD
    Par billy_ze_kid dans le forum ASP
    Réponses: 6
    Dernier message: 12/06/2005, 21h30
  5. [communication série] problème lecture/écriture
    Par davinout dans le forum API, COM et SDKs
    Réponses: 9
    Dernier message: 01/06/2005, 14h14

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo