problème avec la fonction get()
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:
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.