সম্পাদনা
user <- list( "নাম" = "মোঃ আরিফ", "কাজ" = "প্রোগ্রামিং", "দক্ষতা" = c("পিএইচপি", "পাইথন", "জাভাস্ক্রিপ্ট"), "তথ্য" = list( "দেশ" = "বাংলাদেশ" ) ) cat("<table border='1'> ") cat("<tr> ") cat("<th colspan='2'>তথ্য</th> ") cat("</tr> ") cat("<tr> ") cat("<th>নাম</th> ") cat("<td>", user[["নাম"]], "</td> ") cat("</tr> ") cat("<tr> ") cat("<th>কাজ</th> ") cat("<td>", user[["কাজ"]], "</td> ") cat("</tr> ") cat("<tr> ") cat("<th>দক্ষতা</th> ") cat("<td>", paste(user[["দক্ষতা"]], collapse = ", "), "</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("</table> ") cat("</td> ") cat("</tr> ") cat("</table> ")
পূর্বরূপ
