Truncate character strings
truncName(x,n)
x
n
Character string
N. LeMeur
xx <- "Anticonstitutionnelement is a family name" truncName(xx,5)