title: Legend Horizontal Graph Spacing in R
body: <p>Ok so I actually asked this before, although I have made more progress now, but I wasn't sure how to add code to a comment of my old post. Anyways here is my new problem.  I am using the legend command to creat a horizontal leged and I was hoping there is a way to reduce the space between the legend item list</p>
  
  <pre><code># initial variables, this is fine
  t = 0:50
  int_seq = seq(0,0.1,by=0.025)
  int_seq100 = 100 * int_seq
  colors = c("black","red","blue","green","orange")
  index = 1:length(int_seq)
  
  #AV Simple Interest, this is fine
  avSimple = function(i,t){
      av = (1 + (i * t))
      return(av)}
  
  # Plot range for y-axis, this is fine
  yrange = c(avSimple(min(int_seq),min(t)) * 0.95,
      avSimple(max(int_seq),max(t)) * 1.15)
  
  # Plots Simple Interest with different interest rates, this is fine
  plot(t,avSimple(int_seq[1],t), type="l", main = "AV Simple Interest",
      xlab = "Time", ylab = "AV", ylim = yrange)
  for (i in index) 
      lines(t,avSimple(int_seq[i],t), col = colors[i])
  
  # Adds legend to plot for different interest rates
  # where the trouble is
  # ? And how can I reduce distance between each index in the labs string
  # so it is only a space or two apart from each other
  labs = c("i =:",sprintf('%s%%', c(int_seq100)))
  legend('topleft', legend = labs, text.col = c("black",colors), 
      horiz = TRUE, bty = "n")
  </code></pre>