Как построить график, используя функцию plot внутри функции, используя if l oop в R

Question

crime.value = 1

crime.bar <- function() {
  bp<-ggplot(df_category, aes(x=Category, y=Frequency, fill=Category)) + geom_bar(stat="identity") + 
    theme(axis.text.x=element_blank())
  bp
}

  if (crime.value == 1) {
    crime.bar()
  }

Функция Plot работает, когда я вызываю crime.bar() отдельно. но когда вызывается через if l oop, это не работает. пожалуйста, помогите.

Answer 1

Вам нужно использовать print(bp) внутри l oop для принудительного вывода. Благодаря @ Dave2e