> library(gdata)
 
> # ouverture du fichier Excel et importation des données présentes sur la feuille 1
> mes_données <- read.xls('testxy.xls',sheet=1)
 
> class(mes_données)
[1] "data.frame"
> str(mes_données)
'data.frame':	7 obs. of  4 variables:
 $ id  : int  1 2 3 4 5 6 7
 $ x   : int  235 245 255 265 275 285 295
 $ y   : int  424 444 464 484 504 524 544
 $ test: Factor w/ 7 levels "a ","b ","c ",..: 1 2 3 4 5 6 7
> # les données sont importées dans un dataframe
 
> mes_données
  id   x   y test
1  1 235 424   a 
2  2 245 444   b 
3  3 255 464   c 
4  4 265 484   d 
5  5 275 504   e 
6  6 285 524   f 
7  7 295 544   g 
 
> summary(mes_données)
       id            x             y       test  
 Min.   :1.0   Min.   :235   Min.   :424   a :1  
 1st Qu.:2.5   1st Qu.:250   1st Qu.:454   b :1  
 Median :4.0   Median :265   Median :484   c :1  
 Mean   :4.0   Mean   :265   Mean   :484   d :1  
 3rd Qu.:5.5   3rd Qu.:280   3rd Qu.:514   e :1  
 Max.   :7.0   Max.   :295   Max.   :544   f :1  
                                           g :1  
> mes_données$x
[1] 235 245 255 265 275 285 295
> mes_données$y
[1] 424 444 464 484 504 524 544
> mes_données$id
[1] 1 2 3 4 5 6 7
 
> # plot basique des données x,y 
> plot(mes_données$x, mes_données$y)