With xtable and type = html how to add a class to a specific td tag

[Nulled]

I'm trying to create a table in html with xtable, but I need to add a class to specific \[code\]td\[/code\] tag, because I going to do an animation. The problems is that I can't do it without xtable because it is so slow. May be I need to represent this but with xtable.\[code\]myRenderTable<-function(){ table = "<table>" for(i in 1:4862){ table = paste(table,"<tr><td>",i,"</td>",sep="") for(j in 1:5){ if(j == 5){ table = paste(table,"<td class ='something'>",i+j,"</td>",sep="") } else{ table = paste(table,"<td>",i+j,"</td>",sep="") } } table = paste(table,"</tr><table>") } return(table)}\[/code\]If I do it with xtable my app takes 15sec but if I do it with myRederTable function my app takes 2 minutes, so how can I do to put this class in a \[code\]td\[/code\] with xtable.I'm working with R and shiny.