সম্পাদনা
user <- list( "নাম" = "মোঃ আরিফ", "তথ্য" = list( "স্বপ্ন" = "সফটওয়্যার ইঞ্জিনিয়ার", "দেশ" = "বাংলাদেশ" ) ) cat("<table border='1'> ") cat("<tr> ") cat("<th>নাম</th> ") cat("<td>", user[["নাম"]], "</td> ") cat("</tr> ") cat("<tr> ") cat("<th>তথ্য</th> ") cat("<td> ") cat("<table border='1'> ") cat("<tr> ") cat("<th>স্বপ্ন</th> ") cat("<td>", user[["তথ্য"]][["স্বপ্ন"]], "</td> ") cat("</tr> ") cat("<tr> ") cat("<th>দেশ</th> ") cat("<td>", user[["তথ্য"]][["দেশ"]], "</td> ") cat("</tr> ") cat("</table> ") cat("</td> ") cat("</tr> ") cat("</table> ")
পূর্বরূপ
