<\/p>\n
Mo\u017cesz u\u017cy\u0107 funkcji tryCatch()<\/strong> w R, aby zwr\u00f3ci\u0107 warto\u015b\u0107 wyra\u017cenia lub wygenerowa\u0107 niestandardowy komunikat w przypadku napotkania ostrze\u017cenia lub b\u0142\u0119du.<\/span><\/span><\/p>\n Ta funkcja wykorzystuje nast\u0119puj\u0105c\u0105 podstawow\u0105 sk\u0142adni\u0119:<\/span><\/p>\n Poni\u017csze przyk\u0142ady pokazuj\u0105, jak w praktyce u\u017cywa\u0107 funkcji tryCatch()<\/strong> .<\/span><\/p>\n Za\u0142\u00f3\u017cmy, \u017ce tworzymy nast\u0119puj\u0105c\u0105 funkcj\u0119 tryCatch()<\/strong> , kt\u00f3ra pr\u00f3buje pobra\u0107 log jednej warto\u015bci, a nast\u0119pnie podzieli\u0107 go przez drug\u0105 warto\u015b\u0107.<\/span><\/p>\n Je\u015bli wyst\u0105pi b\u0142\u0105d, wy\u015bwietlimy komunikat \u201eWyst\u0105pi\u0142 b\u0142\u0105d\u201d, a nast\u0119pnie wydrukujemy b\u0142\u0105d w R.<\/span><\/p>\n Je\u015bli pojawi si\u0119 ostrze\u017cenie, wy\u015bwietlimy komunikat \u201eWyst\u0105pi\u0142o ostrze\u017cenie\u201d, wydrukujemy ostrze\u017cenie do R, a nast\u0119pnie zwr\u00f3cimy warto\u015b\u0107 NA.<\/span><\/p>\n Je\u015bli nie wyst\u0105pi\u0105 \u017cadne b\u0142\u0119dy ani ostrze\u017cenia, po prostu zwr\u00f3cimy wynik funkcji.<\/span><\/p>\n Uruchommy t\u0119 funkcj\u0119 w r\u00f3\u017cnych scenariuszach.<\/span><\/p>\n Scenariusz 1: Nie wyst\u0119puj\u0105 \u017cadne b\u0142\u0119dy ani ostrze\u017cenia.<\/strong><\/span><\/p>\n Poni\u017cszy kod pokazuje, jak u\u017cywa\u0107 tej funkcji w scenariuszu, w kt\u00f3rym nie wyst\u0119puj\u0105 \u017cadne b\u0142\u0119dy ani ostrze\u017cenia.<\/span><\/p>\n Poniewa\u017c nie wyst\u0119puj\u0105 \u017cadne b\u0142\u0119dy ani ostrze\u017cenia, funkcja po prostu zwraca wynik wyra\u017cenia, kt\u00f3ry okazuje si\u0119 wynosi\u0107 1.151293<\/strong> .<\/span><\/p>\n Scenariusz 2: Wyst\u0105pi\u0142 b\u0142\u0105d.<\/strong><\/span><\/p>\n Poni\u017cszy kod pokazuje, jak u\u017cywa\u0107 tej funkcji w scenariuszu, w kt\u00f3rym wyst\u0105pi b\u0142\u0105d:<\/span><\/p>\n Poniewa\u017c podali\u015bmy tylko jeden argument funkcji, otrzymujemy komunikat \u201e Wyst\u0105pi\u0142 b\u0142\u0105d<\/strong> \u201d i widzimy tak\u017ce dok\u0142adny b\u0142\u0105d wygenerowany przez R.<\/span><\/p>\n Scenariusz 3: Wyst\u0119puje ostrze\u017cenie.<\/strong><\/span><\/p>\n Poni\u017cszy kod pokazuje, jak u\u017cywa\u0107 tej funkcji w scenariuszu, w kt\u00f3rym pojawia si\u0119 ostrze\u017cenie:<\/span><\/p>\n Poniewa\u017c podali\u015bmy warto\u015b\u0107 ujemn\u0105 dla pierwszego argumentu, R nie jest w stanie obliczy\u0107 logu warto\u015bci ujemnej, wi\u0119c otrzymujemy komunikat \u201e Wyst\u0105pi\u0142o ostrze\u017cenie<\/strong> \u201d, widzimy dok\u0142adne ostrze\u017cenie wygenerowane przez R i funkcja zwraca NA<\/strong> jako ma warto\u015b\u0107 ujemn\u0105. wynik.<\/span><\/p>\n Poni\u017csze samouczki wyja\u015bniaj\u0105, jak wykonywa\u0107 inne typowe operacje w j\u0119zyku R:<\/span><\/p>\n Jak utworzy\u0107 zagnie\u017cd\u017con\u0105 p\u0119tl\u0119 For w R<\/a> Mo\u017cesz u\u017cy\u0107 funkcji tryCatch() w R, aby zwr\u00f3ci\u0107 warto\u015b\u0107 wyra\u017cenia lub wygenerowa\u0107 niestandardowy komunikat w przypadku napotkania ostrze\u017cenia lub b\u0142\u0119du. Ta funkcja wykorzystuje nast\u0119puj\u0105c\u0105 podstawow\u0105 sk\u0142adni\u0119: my_function <- function (x, y){ tryCatch ( #try to do this { #some expression }, #if an error occurs, tell me the error error= function (e) { message(’ An […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[3],"tags":[],"class_list":["post-3016","post","type-post","status-publish","format-standard","hentry","category-przewodnik"],"yoast_head":"\n my_function <- function<\/span> (x, y){\n tryCatch<\/span> (\n #try to do this<\/span>\n {\n #some expression\n },\n #if an error occurs, tell me the error<\/span>\n error= function<\/span> (e) {\n message(' An Error Occurred<\/span> ')\n print(e)\n },\n #if a warning occurs, tell me the warning<\/span>\n warning= function<\/span> (w) {\n message(' A Warning Occurred<\/span> ')\n print(w)\n return<\/span> (NA)\n }\n )\n}\n<\/strong><\/pre>\n Przyk\u0142ad: Utw\u00f3rz funkcj\u0119 tryCatch() w R<\/strong><\/span><\/h3>\n
log_and_divide <- function<\/span> (x, y){\n tryCatch<\/span> (\n {\n result = log(x) \/ y\n return<\/span> (result)\n },\n error= function<\/span> (e) {\n message(' An Error Occurred<\/span> ')\n print(e)\n },\n warning= function<\/span> (w) {\n message(' A Warning Occurred<\/span> ')\n print(w)\n return<\/span> (NA)\n }\n )\n}\n<\/span><\/span><\/strong><\/pre>\n #run function<\/span>\nlog_and_divide(10, 2)\n\n[1] 1.151293\n<\/span><\/span><\/strong><\/pre>\n #run function\n<\/span>log_and_divide(10)\n\nAn Error Occurred\n<simpleError in doTryCatch(return(expr), name, parentenv, handler):\n argument \"y\" is missing, with no default>\n<\/span><\/span><\/strong><\/pre>\n #run function\n<\/span>log_and_divide(-10, 2)\n\nA Warning Occurred\n<simpleWarning in log(x): NaNs produced>\n[1] NA\n<\/span><\/span><\/strong><\/pre>\n Dodatkowe zasoby<\/strong><\/span><\/h3>\n
Jak doda\u0107 warto\u015bci do wektora za pomoc\u0105 p\u0119tli w R<\/a>
Jak zwr\u00f3ci\u0107 warto\u015b\u0107 funkcji w R<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"