Jak załadować wiele pakietów w r (z przykładem)

Możesz użyć następującej podstawowej składni, aby załadować wiele pakietów do R jednocześnie:

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

W tym przykładzie Some_packages reprezentuje wektor nazw pakietów, które chcesz załadować.

Poniższy przykład pokazuje, jak zastosować tę składnię w praktyce.

Przykład: załaduj wiele pakietów w R

Poniższy kod pokazuje, jak podsumować zestaw danych w R i utworzyć wykres przy użyciu trzech różnych pakietów:

• dplyr
• ggplot2
• ggmotywy

W tym przykładzie ładujemy każdy pakiet indywidualnie, używając trzech różnych funkcji bibliotecznych() :

 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()

Za pomocą tego kodu możemy załadować wszystkie trzy pakiety i wygenerować wykres podsumowujący wartości zbioru danych.

Jednakże ten sam wynik moglibyśmy osiągnąć, używając funkcji lapply() do załadowania wszystkich trzech pakietów za pomocą jednego wiersza kodu:

 #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() 

Po raz kolejny jesteśmy w stanie załadować wszystkie trzy pakiety i wyprodukować taką samą działkę jak poprzednio.

Różnica polega na tym, że tym razem jesteśmy w stanie załadować wszystkie trzy pakiety za pomocą jednej linijki kodu.

Ta funkcja lapply() jest szczególnie przydatna, gdy chcesz załadować długą listę pakietów bez wpisywania za każdym razem funkcji Library() .

Dodatkowe zasoby

Poniższe samouczki wyjaśniają, jak wykonywać inne typowe zadania w języku R:

Jak wyczyścić środowisko w R
Jak wyczyścić wszystkie działki w RStudio
Jak interpretować w R: następujące obiekty są ukryte