Knit PDF Output with CAT in R

Question

I am using CAT command in R to get following output.

The Output in knitted PDF file is different to what I get in console. How can I get similar output in PDF as I get in Console ?

In PDF Output, the print question and code output is getting intermingled.

header <- blue$italic

cat(header("\nAre there any Missing Values ? \n"))
anyNA(cars_df)

cat(header("\nHow many Missing Values are there ? \n"))
sum(is.na(cars_df))

cat(header("\nWhich Variables have got Missing Values ? \n"))
colSums(is.na(cars_df))

R Studio Console Output

Knitted PDF Output

Answer 1

I had the same issue but with html:

this>

results in this ugly mess >

Solution 1 is to use "hold" instead of "asis":=>