Bonjour à tous,

J'ai un problème -a priori- avec la fonction get() : je n'arrive pas à récupérer la valeur d'un objet, pourtant celui-ci existe bel et bien.

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
20
21
> library(flowClust)
> string <- "NK_QUI_CH_NKG2D_trans_2"
> if (substring(string, nchar(string)-3, nchar(string)) == ".fcs") 
        { read <- read.FCS(string, alter.names=TRUE) } 
        else 
        { string <- paste("/home/blabla/tests", "/", "NK_QUI_CH_NKG2D_trans_2", sep=""); 
        load(string); 
        read <- "NK_QUI_CH_NKG2D_trans_2$alive" } 
 
> ls()
[1] "NK_QUI_CH_NKG2D_trans_2" "read"                   
[3] "string" 
> summary(NK_QUI_CH_NKG2D_trans_2)
      Length Class  Mode   
alive 525980 -none- numeric
dead  101370 -none- numeric
> read
[1] "NK_QUI_CH_NKG2D_trans_2$alive"                
 
> get(read)
Erreur dans get(read) : objet 'NK_QUI_CH_NKG2D_trans_2$alive' introuvable
Merci d'avance... C'est probablement dû à un détail idiot.