R kodumdaki olası hata mesajlarını yakalamak için tryCatch
çok kullanırım, ancak bugün ggplot
ile ilgili garip bir sorunla karşılaştım - ve gerçekten neler olup bittiğine dair bir fikrim yok (hatta bir süre sonra bile Google/SO arama). Tamamlanmamış bir ggplot
çağrı (hiçbir ilave tabakası) iletryCatch ve ggplot
Basit bir örnek:
> tryCatch(eval(parse(text = 'ggplot(mtcars, aes(x=hp, y=wt))')), error = function(e) e)
Error: No layers in plot
Yani hata yakalanan değildir. Daha da: Ben
ggplot
sınıfıyla bir R nesnesi olsun:
> str(tryCatch(eval(parse(text = 'ggplot(mtcars, aes(x=hp, y=wt))')), error = function(e) e))
List of 8
$ data :'data.frame': 32 obs. of 11 variables:
..$ mpg : num [1:32] 21 21 22.8 21.4 18.7 18.1 14.3 24.4 22.8 19.2 ...
..$ cyl : num [1:32] 6 6 4 6 8 6 8 4 4 6 ...
..$ disp: num [1:32] 160 160 108 258 360 ...
..$ hp : num [1:32] 110 110 93 110 175 105 245 62 95 123 ...
..$ drat: num [1:32] 3.9 3.9 3.85 3.08 3.15 2.76 3.21 3.69 3.92 3.92 ...
..$ wt : num [1:32] 2.62 2.88 2.32 3.21 3.44 ...
..$ qsec: num [1:32] 16.5 17 18.6 19.4 17 ...
..$ vs : num [1:32] 0 0 1 1 0 1 0 1 1 1 ...
..$ am : num [1:32] 1 1 1 0 0 0 0 0 0 0 ...
..$ gear: num [1:32] 4 4 4 3 3 3 3 4 4 4 ...
..$ carb: num [1:32] 4 4 1 1 2 1 4 2 2 4 ...
$ layers : list()
$ scales :Reference class 'Scales' [package "ggplot2"] with 1 fields
..$ scales: NULL
..and 20 methods, of which 9 are possibly relevant:
.. add, clone, find, get_scales, has_scale, initialize, input, n,
.. non_position_scales
$ mapping :List of 2
..$ x: symbol hp
..$ y: symbol wt
$ options :List of 1
..$ labels:List of 2
.. ..$ x: chr "hp"
.. ..$ y: chr "wt"
$ coordinates:List of 1
..$ limits:List of 2
.. ..$ x: NULL
.. ..$ y: NULL
..- attr(*, "class")= chr [1:2] "cartesian" "coord"
$ facet :List of 1
..$ shrink: logi TRUE
..- attr(*, "class")= chr [1:2] "null" "facet"
$ plot_env :<environment: R_GlobalEnv>
- attr(*, "class")= chr "ggplot"
Herhangi fikirleri hataları bu tür yakalamak için?
Güncelleme: Yukarıdaki çağrı (daha sonra bir katman ekleme) bazı durumlarda Tamam olabilir gerçeğinin farkındayım. Ama sonra şu örneği düşünün lütfen (biz orada bir yazım hatası olduğunu lütfen unutmayın: t
yerine wt
ait y
ekseninde verilmiştir):
> tryCatch(eval(parse(text = 'ggplot(mtcars, aes(x=hp, y=t)) + geom_point()')), error = function(e) e)
Error in data.frame(x = c(110, 110, 93, 110, 175, 105, 245, 62, 95, 123, :
arguments imply differing number of rows: 32, 0
şu hata mesajını alıyorum, ama bu tryCatch
tarafından yakalanan değil.
Müthiş sayesinde bir sürü Bu
print
deyimi etrafındatryCatch
koymak zorunda demektir! Bunu nasıl özleyebilirim? :) İlk satırınıza bir bakış attıktan sonra oldukça açıktı, ama bu soru bana bundan birkaç saat önce baş ağrısını verdi. Yani kısaca: tekrar teşekkürler :) – daroczigSevindim Ben yardımcı olabilir! Bazen biri sadece kodlara çok yakın olabilir ... – Andrie