Thats standard R behaviour so if you want to assign a result to a name and also then display you have two options.
just repeat the name of the object as your next line of code. or wrap the code which does the assignment in a pair of brackets.
library(tidyverse)
# first way
p1 <- ggplot(data=iris,aes(x=Petal.Length,y=Petal.Width)) + geom_point()
p1
# second way
(p2 <- ggplot(data=iris,aes(x=Sepal.Length,y=Sepal.Width)) + geom_point())