shiny (R)에서 downloadHandler를 사용하여 visNetwork를 png로 내보내기하면 빈 파일이 생성됩니다.

Question

최종 사용자가 shiny로 빌드하고 배포 한 visNetwork 그래픽의 .png을 내보낼 수 있기를 바랍니다. 나는 renderVisNetwork 코드 끝에 visExport 줄을 사용하여이 작업을 수행 할 수 있지만 출력에 생성 된 단추 모양이 마음에 들지 않으며 단추 자체가 내 보낸 .png에 포함됩니다. .png 자체의 품질은 그다지 뛰어나지 않습니다. UI에서 downloadButton에 의해 생성 된 버튼 모양이 마음에 들지만 서버 쪽에서 downloadHandler과 관련된 문제가 발생합니다. 브라우저에서 실행되는 동안 다운로드 버튼을 클릭하고 다운로드 대화 상자를 표시하며 파일을 저장할 수 있지만 파일은 비어 있습니다 (파일 크기는 318 바이트). .pdf로 시도해도 작동하지 않습니다. 여기에 내 코드입니다 :

ui.R :

downloadButton('ConDL', label='Download png') 

server.R : 내가 대신 반응성의 기능을 가진 객체를 생성 여기에 대해 주어진 조언을 따랐습니다

# Create network 
ConNet <- function(){ 
    visNetwork(Nodes(), Edges()) %>% 
    #all the other stuff to create the network which works fine 
} 

# Draw visualization - works fine 
output$ConNet <- renderVisNetwork({ 
    ConNet() 
})  

# Download png of visualization - no errors displayed in browser or 
# console when testing, but exports blank png 
output$ConDL <- downloadHandler(
    filename="Con.png", 
    content= function(file) { 
     png(file) 
     ConNet() 
     dev.off() 
    } 
) 

: Downloading png from Shiny (R). 이전 Conactive를 Connet으로 전환시키는 것은 효과가 없었습니다. 미리보기 창을 통해 실행하는 대신 브라우저 (Firefox)에서 앱을 열어두고 있습니다. 콘텐츠 섹션에서 print(ConNet())을 시도해도 도움이되지 않습니다. 그래서 나는 무엇이 실종되었는지 확신하지 못합니다.

보너스 네트워크 생성시 visInteraction으로 생성 된 탐색 버튼을 제외하도록 .png를 얻을 수 있다면 - 대화 형 부분에 유용하지만 정적 그래픽을 혼란스럽게합니다.

Answer 1

문제를 이해하지 못합니다. 이것은 당신을 도울 수 download network from shiny API