Ваша функция создает объект current_major
в рамках функции, а затем он исчезает в воздухе, когда функция завершается. Вот почему вы его не видите.
Вы могли бы использовать оператор суперприсваивания <<-
majorCompare <- function(current, new){
current_major <<- which(course_data$major == current)
}
majorCompare("Animal Science", "American Studies")
Но в идеале функции должны возвращать что-то, а не изменить вашу глобальную среду. Так что сделайте это вместо этого.
majorCompare <- function(current, new){
which(course_data$major == current)
}
current_major <- majorCompare("Animal Science", "American Studies")
Вы также объявили new
как аргумент функции, но он никогда не используется в теле функции.