testthat - Testing intermediate variables and function in R

Question

How to test intermediate values from a function using test that functionality

Eg.

hello <- function(name){
  new_name <- cat(name,"  new name")
  original_name <- cat("got original name from",new_name )
  return(original_name)
  
}

Here I want to validate new_name without making any change in original function using testthat utility

Want to validate inputs as well(name)

Answer 1

等待大神解答