Programmation en R package Shiny

Bonjour à tous ,

Je débute en R. Je souhaite utiliser le package " Shiny".
Le but de mon programme est d'afficher une liste déroulante avec tous les noms de familles présents dans un fichier csv que je charge au début.

Le fichier est de la forme suivante:
nom;age
toto,12
titi,11

L'erreur est :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Warning: Error in $: object of type 'closure' is not subsettable
Stack trace (innermost first):
    59: as.list
    58: lapply
    57: listify
    56: choicesWithNames
    55: selectInput
    54: tag
    53: tags$form
    52: tag
    51: tags$div
    50: div
    49: sidebarPanel
    48: tag
    47: tags$div
    46: div
    45: tagList
    44: attachDependencies
    43: bootstrapPage
    42: fluidPage
    41: shinyUI
     1: runApp
Error : object of type 'closure' is not subsettable

Mes 2 fichiers ui et server:

ui.R

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
library(shiny)
 
 
shinyUI(fluidPage(
 
 
  sidebarPanel(
    a=(read.csv("C:/chemin/test.csv",header=TRUE,sep=";",dec=",")),
 
    selectInput(inputId = "dataset",
                label = "Choix",
                choices = c("all",unique(as.character(a$nom))),
 
 
  mainPanel()
))))

server.r

Code:

1
2
3
4
5
6
library(shiny)
 
 
shinyServer(function(input, output) {
 
})

Merci d'avance pour l'aide