I wrote a little utility function for exactly this reason, which I use with
long titles. You may want to add calls to par to adjust the upper margin if
you are using raw graphical functionality (plot et al) - but lattice adjusts
the upper margin automatically so you wouldn't need to add anything else.


PrettyString <- function(theString, maxLength, collapse = "\n")
{
        words <- unlist(strsplit(theString, " "))
        wordLengths <- unlist(lapply(strsplit(words, ""), length))

        if(max(wordLengths) > maxLength) 
                stop("maxChar must be increased due to string length")

        count = wordLengths[1]
        results = vector()
        currentLine = words[1]

        for(i in 2:length(words))
        {
                if((count + wordLengths[i] + 1) > maxLength)
                {
                        results = c(results, currentLine)
                        currentLine = words[i]
                        count = wordLengths[i]
                }
                else
                {
                        currentLine = paste(currentLine, words[i])
                        count = count + wordLengths[i] + 1
                }
        }
        if(length(currentLine))
                results <- c(results, currentLine)

        paste(results, collapse = collapse)
}


Knowing the R list, someone can probably reduce this function to 2 lines of
code.
Jim



Svempa wrote:
> 
> I want to fit a fairly long main title for a plot, supposedly by changing
> row after a while. As for now it starts way outside the picture margin at
> the left and continues way out right passed the right margins.
> 
>>plot(A,main="This is my really long title and it's so long that I can see
just about half of it.")
> 
> Any suggestions? Shouldn't be that hard.
> 
> 

-- 
View this message in context: 
http://www.nabble.com/Fitting-large-titles-in-a-plot-tf4956510.html#a14196971
Sent from the R help mailing list archive at Nabble.com.

______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to