R 수염 템플릿 엔진

Question

를 사용하여 줄 바꿈으로 번호 매기기 목록을 생성하는 방법은 다음과 같은 데이터가 있습니다 렌더링 할 때 R의 템플릿 엔진 whisker를 사용

data <- list(name = "Chris", 
      children_names = c("Alex", "John") 
      ) 

, 나는이 출력, 을 얻으려면을 :

I am Chris 
My children are: 
    Child No 1 is Alex 
    Child No 2 is John 

이 내 현재 코드입니다 :

library(whisker) 
template <- 
'I am {{name}} 
My children are: 
{{children_names}} 
' 

data <- list(name = "Chris", 
      children_names = c("Alex", "John") 

      ) 

text <- whisker.render(template, data) 
cat(text) 

# which produces: 

# I am Chris 
# My children are: 
# Alex,John 

W hich는 내가 원하는 것이 아닙니다. 올바른 방법은 무엇입니까?

Answer 1

당신은 아마 이미 알아 냈하지만, 경우에 당신이하지 않은 :

library(whisker) 

template <- 
    'I am {{name}} \n 
    My children are: \n 
    {{#children_names}} 
    Child No {{number}} is {{cname}} 
    {{/children_names}}' 

data <- list( 
    name = "Chris", 
    children_names = list(
    list(cname = "Alex", number = 1), list(cname = "John", number = 2) 
) 
) 

text <- whisker.render(template, data) 
cat(text) 

# I am Chris 
# 
# My children are: 
# 
# Child No 1 is Alex 
# Child No 2 is John