「r<-Shiny」工作流(二)調試

當你開始編寫應用程序時,幾乎可以確定會出錯。導致大多數錯誤的原因是我們心里的 Shiny 設計模型與 Shiny 實際的運行情況的不匹配。當你閱讀本文時,你的思維模式將得到改善,從而減少犯錯,而一旦犯錯,就更容易發現問題。但是,要想首次使用代碼就可以可靠地解決復雜的問題,就需要使用多種語言的多年經驗。這意味著你需要構建一個強大的工作流來識別和修復錯誤。

我們將在下面討論三種主要問題:

  • 你收到意外錯誤。這是最簡單的情況,因為你將獲得一個錯誤追蹤,使你可以準確確定錯誤的出處。一旦發現問題,就需要系統地測試假設,直到發現期望值與實際情況之間存在差異。交互式調試器是解決該問題的強大工具。
  • 你沒有收到任何錯誤,但是值不正確。在這里,通常最好將其轉換為第一個問題,方法是在出現錯誤值時使用 stop() 引發錯誤。
  • 所有值都是正確的,但是在你期望的時候它們不會更新。這是最具挑戰性的問題,因為它是 Shiny 所特有的,因此你無法利用現有的 R 調試技能。

當出現這些情況時,這很令人沮喪,但是你可以將它們變成練習調試技能的機會。

在下一部分中,我們將介紹另一種重要的技術,以最小的可重現性為例。如果你陷入困境并需要別人的幫助,創建一個最小的示例至關重要。但是,在調試自己的代碼時,創建最少的示例也是一項極為重要的技能。通常,我們有很多可以正常運行的代碼,還有很少量的會引起問題的代碼。如果我們可以通過刪除有效的代碼來縮小問題代碼的范圍,則可以更快地迭代解決方案。這是我一直使用的技術。

閱讀錯誤追蹤

每個錯誤都伴有一個追溯或調用堆棧,它實際上是追溯導致該錯誤的調用堆棧。例如,采取以下簡單的調用順序:f() 調用 g() 調用 h(),而 h() 使用了乘法操作。

f <- function(x) g(x)
g <- function(x) h(x)
h <- function(x) x * 2

如果代碼報錯了,如下:

f("a")
#> Error in x * 2: non-numeric argument to binary operator

調用堆棧是導致問題的調用順序:

1: f("a")
2: g(x)
3: h(x)

您可能已經熟悉 R 中的 traceback()。此功能可以在發生錯誤之后以交互方式運行以查看導致錯誤的調用順序。我們無法在 Shiny 中使用此功能,因為我們無法在應用運行時以交互方式運行代碼,而是 Shiny 會自動為我們打印調用堆棧。例如,以使用我上面定義的 f() 函數的簡單應用程序為例:

library(shiny)

ui <- fluidPage(
  selectInput("n", "N", 1:10),
  plotOutput("plot")
)
server <- function(input, output, session) {
  output$plot <- renderPlot({
    n <- f(input$n)
    plot(head(cars, n))
  })
}
shinyApp(ui, server)

如果運行此代碼,我們會在應用程序中看到錯誤消息,并在控制臺中看到調用堆棧:

Warning: Error in *: non-numeric argument to binary operator
  173: g [~/.active-rstudio-document#4]
  172: f [~/.active-rstudio-document#3]
  171: renderPlot [~/.active-rstudio-document#13]
  169: func
  129: drawPlot
  115: <reactive:plotObj>
   99: drawReactive
   86: origRenderFunc
   85: output$plot
    5: runApp
    3: print.shiny.appobj
    1: source

Shiny 將一些其他調用添加到調用堆棧中。要了解發生了什么,請先將其上下顛倒,這樣我們就可以按顯示順序查看調用順序:

Warning: Error in *: non-numeric argument to binary operator
    1: source
    3: print.shiny.appobj
    5: runApp
   85: output$plot
   86: origRenderFunc
   99: drawReactive
  115: <reactive:plotObj>
  129: drawPlot
  169: func
  171: renderPlot [~/.active-rstudio-document#13]
  172: f [~/.active-rstudio-document#3]
  173: g [~/.active-rstudio-document#4]

調用棧包含三個基本部分:

  • 前幾個調用會啟動應用程序。

    1: source
    3: print.shiny.appobj
    5: runApp
    
  • 接下來,我們看到一些內部 Shiny 的代碼負責調用反應式表達式。

     85: output$plot
     86: origRenderFunc
     99: drawReactive
    115: <reactive:plotObj>
    129: drawPlot
    169: func
    

在這里,發現 output$plot 非常重要-它告訴我們哪個反應堆導致了錯誤。接下來的幾個功能是內部的,我們可以忽略它們。

  • 最后,在最底部,我們將看到編寫的代碼函數。

    171: renderPlot [~/.active-rstudio-document#13]
    172: f [~/.active-rstudio-document#3]
    173: g [~/.active-rstudio-document#4]
    

如果你在應用程序中遇到錯誤但沒有看到回溯,請確保你正在使用 Cmd/Ctrl + Shift + Enter(或者如果不在 RStudio 中,請調用 runApp())運行該應用程序,并且已保存你正在運行的文件。其他運行應用程序的方式并不總是捕獲進行調用堆棧所需的信息。

交互式調試器

找到錯誤的根源并弄清楚是什么原因后,你可以使用的最強大的工具是交互式調試器。調試器會暫停執行,并為你提供一個交互式 R 控制臺,你可以在其中運行任何代碼以找出問題所在。有兩種啟動調試器的方法:

  • 在你的源代碼中添加對 browser()的調用。這是啟動交互式調試器的標準 R 方法,并且可以在你運行狀況良好的情況下使用。browser() 的另一個優點是,由于它是 R 代碼,因此可以通過將其與 if 語句結合使用來使其成為有條件的:

    if (input$debug) {
      browser()
    }
    
  • 通過單擊行號左側來添加 RStudio 斷點。你可以通過單擊紅色圓圈刪除斷點。斷點的優點在于它們不是代碼,因此你不必擔心將它們意外地插入到版本控制系統中。

如果你使用的是 RStudio,則在調試器中將顯示下圖中的工具欄。工具欄是記住現在可用的調試命令的簡便方法。它們也可以在 RStudio 之外使用;你只需要記住一個字母命令即可激活它們。三個最有用的命令是:

  • 下一步 n:執行函數的下一步。請注意,如果你有一個名為 n 的變量,則需要使用 print(n) 來顯示其值。
  • 繼續 c:離開交互式調試并繼續正常執行該函數。如果你已修正錯誤狀態并希望檢查函數是否正常運行,這將非常有用。
  • 停止 Q:停止調試,終止功能,然后返回全局工作區。確定問題出在哪里后,就可以使用它,并準備好進行修復并重新加載代碼。
RStudio 調試工具欄

將不對的值轉換為錯誤

如果你遇到的問題不是錯誤,建議將其轉換為錯誤,以便更輕松地查找問題。讀者可以通過編寫自己的調用 stop() 的代碼來實現。

調試響應式編程

使用 message() 向控制臺發出消息,這樣我們可以準確查看代碼何時運行。你可以將消息放入任何反應式表達式或輸出中,只需確保它們不是最后一行(否則它們將成為反應表達式或輸出使用的值)。

如果要輸出多個值,則 glue 包可能會有用;它使創建內容豐富的文本字符串變得非常容易。

如果問題是反應式事件未按預期觸發,你可能需要查找反應式日志,reactlog 包可能會很有用。

最后編輯于
?著作權歸作者所有,轉載或內容合作請聯系作者
平臺聲明:文章內容(如有圖片或視頻亦包括在內)由作者上傳并發布,文章內容僅代表作者本人觀點,簡書系信息發布平臺,僅提供信息存儲服務。
  • 序言:七十年代末,一起剝皮案震驚了整個濱河市,隨后出現的幾起案子,更是在濱河造成了極大的恐慌,老刑警劉巖,帶你破解...
    沈念sama閱讀 230,431評論 6 544
  • 序言:濱河連續發生了三起死亡事件,死亡現場離奇詭異,居然都是意外死亡,警方通過查閱死者的電腦和手機,發現死者居然都...
    沈念sama閱讀 99,637評論 3 429
  • 文/潘曉璐 我一進店門,熙熙樓的掌柜王于貴愁眉苦臉地迎上來,“玉大人,你說我怎么就攤上這事?!?“怎么了?”我有些...
    開封第一講書人閱讀 178,555評論 0 383
  • 文/不壞的土叔 我叫張陵,是天一觀的道長。 經常有香客問我,道長,這世上最難降的妖魔是什么? 我笑而不...
    開封第一講書人閱讀 63,900評論 1 318
  • 正文 為了忘掉前任,我火速辦了婚禮,結果婚禮上,老公的妹妹穿的比我還像新娘。我一直安慰自己,他們只是感情好,可當我...
    茶點故事閱讀 72,629評論 6 412
  • 文/花漫 我一把揭開白布。 她就那樣靜靜地躺著,像睡著了一般。 火紅的嫁衣襯著肌膚如雪。 梳的紋絲不亂的頭發上,一...
    開封第一講書人閱讀 55,976評論 1 328
  • 那天,我揣著相機與錄音,去河邊找鬼。 笑死,一個胖子當著我的面吹牛,可吹牛的內容都是我干的。 我是一名探鬼主播,決...
    沈念sama閱讀 43,976評論 3 448
  • 文/蒼蘭香墨 我猛地睜開眼,長吁一口氣:“原來是場噩夢啊……” “哼!你這毒婦竟也來了?” 一聲冷哼從身側響起,我...
    開封第一講書人閱讀 43,139評論 0 290
  • 序言:老撾萬榮一對情侶失蹤,失蹤者是張志新(化名)和其女友劉穎,沒想到半個月后,有當地人在樹林里發現了一具尸體,經...
    沈念sama閱讀 49,686評論 1 336
  • 正文 獨居荒郊野嶺守林人離奇死亡,尸身上長有42處帶血的膿包…… 初始之章·張勛 以下內容為張勛視角 年9月15日...
    茶點故事閱讀 41,411評論 3 358
  • 正文 我和宋清朗相戀三年,在試婚紗的時候發現自己被綠了。 大學時的朋友給我發了我未婚夫和他白月光在一起吃飯的照片。...
    茶點故事閱讀 43,641評論 1 374
  • 序言:一個原本活蹦亂跳的男人離奇死亡,死狀恐怖,靈堂內的尸體忽然破棺而出,到底是詐尸還是另有隱情,我是刑警寧澤,帶...
    沈念sama閱讀 39,129評論 5 364
  • 正文 年R本政府宣布,位于F島的核電站,受9級特大地震影響,放射性物質發生泄漏。R本人自食惡果不足惜,卻給世界環境...
    茶點故事閱讀 44,820評論 3 350
  • 文/蒙蒙 一、第九天 我趴在偏房一處隱蔽的房頂上張望。 院中可真熱鬧,春花似錦、人聲如沸。這莊子的主人今日做“春日...
    開封第一講書人閱讀 35,233評論 0 28
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽。三九已至,卻和暖如春,著一層夾襖步出監牢的瞬間,已是汗流浹背。 一陣腳步聲響...
    開封第一講書人閱讀 36,567評論 1 295
  • 我被黑心中介騙來泰國打工, 沒想到剛下飛機就差點兒被人妖公主榨干…… 1. 我叫王不留,地道東北人。 一個月前我還...
    沈念sama閱讀 52,362評論 3 400
  • 正文 我出身青樓,卻偏偏與公主長得像,于是被迫代替她去往敵國和親。 傳聞我的和親對象是個殘疾皇子,可洞房花燭夜當晚...
    茶點故事閱讀 48,604評論 2 380