Interactive R session - Get window width for print truncation?

Question

Is is possible to access the current window width (in terms of characters) in an interactive session?

Say that we have a long string

x <- paste0(c(r