Problem with printing to a console

[NobelRobin]

Hello,
I'm here again I wrote a function myself to do exploratory analysis with one function
But i got only the results of View, str in my console. (see under the code example)

exploratory<-function(dataset)
{
  data<-dataset
  #content dataframe
  print("inhoud dataframe")
  View(data)
  head(data)
  str(data)
  print("structuur dataset, rowxcolomns, names of row")
  data<-dataset
  dim(data)

  colnames(data)
  
  print("summary of dataset")
  summary(data)
 
  #missing values
  print("missing values are")
  data<-dataset
  is.na(data)
  
  print("positions missing values")
  anyNA<-which(is.na(data))
  #basic plot
  plot(data)

}

Result in my console with dataset mtcars

exploratory(mtcars)
[1] "inhoud dataframe"
'data.frame': 32 obs. of 11 variables:
mpg : num 21 21 22.8 21.4 18.7 18.1 14.3 24.4 22.8 19.2 ... cyl : num 6 6 4 6 8 6 8 4 4 6 ...
disp: num 160 160 108 258 360 ... hp : num 110 110 93 110 175 105 245 62 95 123 ...
drat: num 3.9 3.9 3.85 3.08 3.15 2.76 3.21 3.69 3.92 3.92 ... wt : num 2.62 2.88 2.32 3.21 3.44 ...
qsec: num 16.5 17 18.6 19.4 17 ... vs : num 0 0 1 1 0 1 0 1 1 1 ...
am : num 1 1 1 0 0 0 0 0 0 0 ... gear: num 4 4 4 3 3 3 3 4 4 4 ...
$ carb: num 4 4 1 1 2 1 4 2 2 4 ...
[1] "structuur dataset, rowxcolomns, names of row"
[1] "summary of dataset"
[1] "missing values''

[mduvekot]

note that str() has no return value, so it can output to the console, but its output cannot be assigned to a variable, unless you capture its output with for example

str_output <- capture.output(str(mtcars))

View() also doesn't return anything

[NobelRobin]

thx for all how did a resaerch for it. I found a solution on my own with trial and error
I just set print before each item i wanted to see in the console