row_sep <- rep("----------",3)
print(printTabStyle(row_sep,11))
list1 <- c("Owner","Model","Cc")
print(printTabStyle(list1,11))
print(printTabStyle(row_sep,11))
list2 <- c("Natalja","Honda","125")
print(printTabStyle(list2,11))
print(printTabStyle(row_sep,11))
Run the code above in your browser using DataLab