Rデータをhtmlへの入力として渡しますか？

Question

私はRリストに

list[[1]] 
    [1] 5720 JACKSONBURG RD,TRENTON,OH,45067 
    [2] 1282 OAKMONT AVE,HAMILTON,OH,45013 
    [3] 1001 CHASE AVE,HAMILTON,OH,45015 
    [4] 2266 TWIN OAKS DR,LEBANON,OH,45036 

を持っていると私はHTMLとJavaScriptでのGoogleマップを作成しました。 は、私はHTMLの値のために（手動で）入力として上記のアドレスを使用します。

<select multiple id="waypoints"> 

     <option value="5720 JACKSONBURG RD,TRENTON,OH">1</option> 
     <option value="1282 OAKMONT AVE,HAMILTON,OH,45013 ">2</option> 
     <option value="1001 CHASE AVE,HAMILTON,OH,45015">3</option> 
     <option value="2266 TWIN OAKS DR,LEBANON,OH,45036">4</option> 

<option value="XXXXX"> は私が持っているRデータに基づいて生成する方法はありますか？ループのように？ 私は次のとおりですhttps://developers.google.com/maps/documentation/javascript/examples/directions-waypoints

Answer 1

HTMLを作成したいだけなら、paste（）を使ってそれを行うことができます。

x<-list(c("5720 JACKSONBURG RD,TRENTON,OH,45067", 
    "1282 OAKMONT AVE,HAMILTON,OH,45013", 
    "1001 CHASE AVE,HAMILTON,OH,45015", 
    "2266 TWIN OAKS DR,LEBANON,OH,45036")) 

（ベクトルを含むリストのように見えた）あなたのサンプルデータを使用すると、

paste0("<option value=\"", x[[1]], "\">",seq_along(x[[1]]),"</option>", collapse="") 

Answer 2

一つの可能​​性はXMLパッケージからxmlNode()を使用することで行うことができます。ここでは、同じ呼び出しで子ノードを生成するために、引数にlapply()と一緒に使用することもできます。

library(XML) 

xmlNode(
    "select multiple", 
    attrs = c(id = "waypoints"), 
    .children = lapply(seq_along(x[[1]]), function(i) { 
     xmlNode("option", i, attrs = c(value = x[[1]][i])) 
    }) 
) 
# <select multiple id="waypoints"> 
# <option value="5720 JACKSONBURG RD,TRENTON,OH,45067">1</option> 
# <option value="1282 OAKMONT AVE,HAMILTON,OH,45013">2</option> 
# <option value="1001 CHASE AVE,HAMILTON,OH,45015">3</option> 
# <option value="2266 TWIN OAKS DR,LEBANON,OH,45036">4</option> 
# </select multiple> 

データ：

x <- list(c("5720 JACKSONBURG RD,TRENTON,OH,45067", "1282 OAKMONT AVE,HAMILTON,OH,45013", 
"1001 CHASE AVE,HAMILTON,OH,45015", "2266 TWIN OAKS DR,LEBANON,OH,45036" 
))