Hoe meerdere pakketten in r te laden (met voorbeeld)

U kunt de volgende basissyntaxis gebruiken om meerdere pakketten tegelijk in R te laden:

 lapply(some_packages, library, character. only = TRUE )

In dit voorbeeld vertegenwoordigt some_packages een vector met pakketnamen die u wilt laden.

Het volgende voorbeeld laat zien hoe u deze syntaxis in de praktijk kunt gebruiken.

Voorbeeld: laad meerdere pakketten in R

De volgende code laat zien hoe u een gegevensset in R samenvat en een plot maakt met behulp van drie verschillende pakketten:

• dplyr
• ggplot2
• ggthema’s

In dit voorbeeld laden we elk pakket afzonderlijk met behulp van drie verschillende bibliotheek() -functies:

 library (dplyr)
library (ggplot2)
library (ggthemes)

#make this example reproducible
set. seeds (0)

#create data frame
df <- data. frame (category=rep(c('A', 'B', 'C', 'D', 'E'), each= 10 ),
                 value=runif(50, 10, 20))

#create summary data frame
df_summary <- df %>%
  group_by(category) %>%
  summarize(mean=mean(value),
            sd=sd(value))

#plot mean value of each category with error bars
ggplot(df_summary) +
    geom_bar(aes(x=category, y=mean), stat=' identity ') +
    geom_errorbar(aes(x=category, ymin=mean-sd, ymax=mean+sd), width= 0.3 ) +
    theme_tufte()

Met behulp van deze code kunnen we alle drie de pakketten laden en een diagram maken dat de waarden van een dataset samenvat.

We zouden echter hetzelfde resultaat kunnen bereiken door de functie lapply() te gebruiken om alle drie de pakketten te laden met behulp van een enkele regel code:

 #define vector of packages to load
some_packages <- c(' ggplot2 ', ' dplyr ', ' ggthemes ')

#load all packages at once
lapply(some_packages, library, character. only = TRUE )

#make this example reproducible
set. seeds (0)

#create data frame
df <- data. frame (category=rep(c('A', 'B', 'C', 'D', 'E'), each= 10 ),
                 value=runif(50, 10, 20))

#create summary data frame
df_summary <- df %>%
  group_by(category) %>%
  summarize(mean=mean(value),
            sd=sd(value))

#plot mean value of each category with error bars
ggplot(df_summary) +
    geom_bar(aes(x=category, y=mean), stat=' identity ') +
    geom_errorbar(aes(x=category, ymin=mean-sd, ymax=mean+sd), width= 0.3 ) +
    theme_tufte() 

Opnieuw kunnen we alle drie de pakketten laden en hetzelfde perceel produceren als voorheen.

Het verschil is dat we deze keer alle drie de pakketten kunnen laden met één enkele regel code.

Deze lapply()- functie is vooral handig als u een lange lijst met pakketten wilt laden zonder telkens de bibliotheek()- functie te typen.

Aanvullende bronnen

In de volgende tutorials wordt uitgelegd hoe u andere veelvoorkomende taken in R kunt uitvoeren:

Hoe de omgeving te wissen in R
Hoe alle plots in RStudio te wissen
Hoe te interpreteren in R: de volgende objecten zijn verborgen