আর multidimensional-key

users <- list(
  list("আইডি" = 10, "নাম" = "তানিম", "দেশ" = "বাংলাদেশ"),
  list("আইডি" = 11, "নাম" = "জোহান", "দেশ" = "নেদারল্যান্ড"),
  list("আইডি" = 12, "নাম" = "হামিদ", "দেশ" = "আফগানিস্তান"),
  list("আইডি" = 13, "নাম" = "সাকিব", "দেশ" = "বাংলাদেশ")
)

cat("<table border='1'>
")

cat("<thead>
")
cat("<tr>
")

for (key in names(users[[1]])) {
  cat("<th>", key, "</th>
")
}

cat("</tr>
")
cat("</thead>
")

cat("<tbody>
")

for (user in users) {
  cat("<tr>
")

  for (value in user) {
    cat("<td>", value, "</td>
")
  }

  cat("</tr>
")
}

cat("</tbody>
")
cat("</table>
")