Как связать и отобразить символы в функции

Question

Извините, но очень простой вопрос.
Я сейчас внедряю код Python в R.
Это очень простой код, связанный с обработкой символов, но не запускающийся вообще.
Мне нужна ваша помощь, чтобы исправить мой код.

Заранее спасибо.

Код Python

def hello(obj):  
  print("Hello" + obj +"!")  

hello("cat") 

Вывод вышеуказанного кода

Привет, кот!

Мой код в R

hello <- function(obj){  

  print("Hello ", obj, "!", quote=FALSE)  
}  

hello(cat)

1. Ожидаемые результаты
   То же, что и Python, то есть
   Привет, кот!

2. Фактические результаты
   Ошибка в print.default («Hello», obj, «!», Quote = FALSE): неверный аргумент «цифры»

Answer 1

Мы можем обернуть с paste

hello <- function(obj){  

  print(paste("Hello ", obj, "!", sep = ""), quote=FALSE) 
  #or use cat
  # cat("Hello ", obj, "!")  
}  

hello("cat")
#[1] Hello cat!

ПРИМЕЧАНИЕ: добавление paste из комментариев

Answer 2

Как это?

hello <- function(obj){  

 noquote(paste0("Hello ", obj, "!")  )

 }  

hello("cat")

>[1] Hello cat!

Если вы хотите "хорошенько напечатать" это

hello <- function(obj){  

  cat(format(paste0("Hello ", obj, "!")  ))

  }  


> hello("cat")
Hello cat!