how to word-wrap text in labels in plots?

c <- structure(c(2L, 2L, 1L, 3L, 4L, 2L, 3L, 2L, 3L, 2L, 5L), .Label = c("foo", 
+ "bar", "a really really long variable label mostly here to show the need of word-wrapping text in labels", 
+ "a not so important value", "baz"), class = "factor")
plot(c)

Is there a way to get the long variable labels to automatically wrap so that all labels can be shown?

Alternatively, is there a way to get the labels truncated, possibly with ".." appended?

  
------------------------------------------------------------------------

c <- structure(c(2L, 2L, 1L, 3L, 4L, 2L, 3L, 2L, 3L, 2L, 5L), .Label = c("foo", 
+ "bar", "a really really long variable label mostly here to show the need of word-wrapping text in labels", 
+ "a not so important value", "baz"), class = "factor")
plot(c)

Is there a way to get the long variable labels to automatically wrap so that all labels can be shown?

Alternatively, is there a way to get the labels truncated, possibly with ".." appended?