{"id":3968,"date":"2023-07-14T11:22:08","date_gmt":"2023-07-14T11:22:08","guid":{"rendered":"https:\/\/statorials.org\/nl\/wmape-in-r\/"},"modified":"2023-07-14T11:22:08","modified_gmt":"2023-07-14T11:22:08","slug":"wmape-in-r","status":"publish","type":"post","link":"https:\/\/statorials.org\/nl\/wmape-in-r\/","title":{"rendered":"Hoe wmape in r te berekenen (met voorbeeld)"},"content":{"rendered":"<p><\/p>\n<hr>\n<p><span style=\"color: #000000;\">Een van de meest gebruikte maatstaven om de voorspellingsnauwkeurigheid van een model te meten is <strong>WMAPE<\/strong> , wat staat voor <strong>gewogen gemiddelde absolute procentuele fout<\/strong> .<\/span><\/p>\n<p> <span style=\"color: #000000;\">De formule om WMAPE te berekenen is:<\/span><\/p>\n<p> <span style=\"color: #000000;\"><strong>WMAPE<\/strong> = (\u03a3|y <sub>ik<\/sub> \u2013 \u0177 <sub>ik<\/sub> |*w <sub>ik<\/sub> ) \/ (\u03a3y <sub>ik<\/sub> *w <sub>ik<\/sub> ) * 100<\/span><\/p>\n<p> <span style=\"color: #000000;\">Goud:<\/span><\/p>\n<ul>\n<li> <span style=\"color: #000000;\"><strong>\u03a3<\/strong> \u2013 een symbool dat \u201csom\u201d betekent<\/span><\/li>\n<li> <span style=\"color: #000000;\"><span style=\"color: #000000;\"><b>y <sub>i<\/sub><\/b> \u2013 De werkelijke waarde van de <sup>i-de<\/sup> waarneming<\/span><\/span><\/li>\n<li> <span style=\"color: #000000;\"><b>\u0177 <sub>i<\/sub><\/b> \u2013 De voorspelde waarde van de i- <sup>de<\/sup> waarneming<\/span><\/li>\n<li> <span style=\"color: #000000;\"><b>w <sub>i<\/sub><\/b> \u2013 Het gewicht van de i- <sup>de<\/sup> waarneming<\/span><\/li>\n<\/ul>\n<p> <span style=\"color: #000000;\">We kunnen de volgende functie defini\u00ebren om WMAPE in R te berekenen:<\/span><\/p>\n<pre style=\"background-color: #e5e5e5; font-size: 15px;\"> <strong>find_WMAPE &lt;- <span style=\"color: #008000;\">function<\/span> (y, yhat, w){\n  <span style=\"color: #008000;\">return<\/span> (sum(abs(y-yhat)*w)\/sum(y*w)*100)\n}\n<\/strong><\/pre>\n<p> <span style=\"color: #000000;\">Het volgende voorbeeld laat zien hoe u deze functie in de praktijk kunt gebruiken.<\/span><\/p>\n<h2> <span style=\"color: #000000;\"><strong>Voorbeeld: WMAPE berekenen in R<\/strong><\/span><\/h2>\n<p> <span style=\"color: #000000;\">Stel dat we het volgende gegevensframe in R hebben dat informatie bevat over de werkelijke en verwachte verkopen voor een winkel:<\/span><\/p>\n<pre style=\"background-color: #e5e5e5; font-size: 15px;\"> <strong><span style=\"color: #008080;\">#create dataset<\/span>\ndata &lt;- data. <span style=\"color: #3366ff;\">frame<\/span> (actual=c(23, 37, 44, 47, 48, 48, 46, 43, 32, 27, 26, 24),\n                   forecast=c(37, 40, 46, 44, 46, 50, 45, 44, 34, 30, 22, 23))\n<span style=\"color: #008080;\">\n#view dataset<\/span>\ndata\n\n   current forecast\n1 23 37\n2 37 40\n3 44 46\n4 47 44\n5 48 46\n6 48 50\n7 46 45\n8 43 44\n9 32 34\n10 27 30\n11 26 22\n12 24 23\n<\/strong><\/pre>\n<p> <span style=\"color: #000000;\">Om de WMAPE te berekenen voor het verschil tussen werkelijke en voorspelde verkopen, kunnen we een vector van gewichten defini\u00ebren die we moeten gebruiken, en vervolgens de WMAPE-functie gebruiken die we eerder hebben gedefinieerd:<\/span><\/p>\n<pre style=\"background-color: #e5e5e5; font-size: 15px;\"> <strong><span style=\"color: #008080;\">#define function to calculate WMAPE\n<\/span>find_WMAPE &lt;- <span style=\"color: #008000;\">function<\/span> (y, yhat, w){\n  <span style=\"color: #008000;\">return<\/span> (sum(abs(y-yhat)*w)\/sum(y*w)*100)\n}\n\n<span style=\"color: #008080;\">#define weights for each month\n<\/span>weights &lt;- c(20, 20, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6)\n\n<span style=\"color: #008080;\">#calculate WMAPE\n<\/span>find_WMAPE(df$actual, df$predicted, weights)\n\n[1] 13.27635\n<\/strong><\/pre>\n<p> <span style=\"color: #000000;\">De WMAPE voor dit model blijkt <strong>13,27635%<\/strong> te zijn.<\/span><\/p>\n<p> <span style=\"color: #000000;\">Dat wil zeggen dat de gewogen gemiddelde absolute procentuele fout tussen de voorspelde verkoopwaarden en de werkelijke verkoopwaarden 13,27635% bedraagt.<\/span><\/p>\n<p> <span style=\"color: #000000;\">Merk op dat we in dit voorbeeld veel grotere gewichten hebben toegekend aan de waarden van januari en februari.<\/span><\/p>\n<p> <span style=\"color: #000000;\">Afhankelijk van uw specifieke probleem kunt u grotere of kleinere gewichten toekennen aan verschillende waarnemingen, op basis van het belang van elke fout in uw model.<\/span><\/p>\n<h2> <span style=\"color: #000000;\"><strong>Aanvullende bronnen<\/strong><\/span><\/h2>\n<p> <span style=\"color: #000000;\">In de volgende tutorials wordt uitgelegd hoe u andere veelvoorkomende taken in R kunt uitvoeren:<\/span><\/p>\n<p> <a href=\"https:\/\/statorials.org\/nl\/r-kaart\/\" target=\"_blank\" rel=\"noopener\">Hoe MAPE in R te berekenen<\/a><br \/> <a href=\"https:\/\/statorials.org\/nl\/smape-in-r\/\" target=\"_blank\" rel=\"noopener\">Hoe SMAPE in R te berekenen<\/a><br \/> <a href=\"https:\/\/statorials.org\/nl\/hoe-rmse-in-r-te-berekenen\/\" target=\"_blank\" rel=\"noopener\">Hoe RMSE in R te berekenen<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"<p>Een van de meest gebruikte maatstaven om de voorspellingsnauwkeurigheid van een model te meten is WMAPE , wat staat voor gewogen gemiddelde absolute procentuele fout . De formule om WMAPE te berekenen is: WMAPE = (\u03a3|y ik \u2013 \u0177 ik |*w ik ) \/ (\u03a3y ik *w ik ) * 100 Goud: \u03a3 \u2013 een [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[11],"tags":[],"class_list":["post-3968","post","type-post","status-publish","format-standard","hentry","category-gids"],"yoast_head":"<!-- This site is optimized with the Yoast SEO plugin v21.5 - https:\/\/yoast.com\/wordpress\/plugins\/seo\/ -->\n<title>Hoe WMAPE in R te berekenen (met voorbeeld) \u2013 Statorials<\/title>\n<meta name=\"description\" content=\"In deze tutorial wordt uitgelegd hoe u WMAPE (gewogen gemiddelde absolute procentuele fout) in R kunt berekenen, inclusief voorbeelden.\" \/>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/statorials.org\/nl\/wmape-in-r\/\" \/>\n<meta property=\"og:locale\" content=\"de_DE\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"Hoe WMAPE in R te berekenen (met voorbeeld) \u2013 Statorials\" \/>\n<meta property=\"og:description\" content=\"In deze tutorial wordt uitgelegd hoe u WMAPE (gewogen gemiddelde absolute procentuele fout) in R kunt berekenen, inclusief voorbeelden.\" \/>\n<meta property=\"og:url\" content=\"https:\/\/statorials.org\/nl\/wmape-in-r\/\" \/>\n<meta property=\"og:site_name\" content=\"Statorials\" \/>\n<meta property=\"article:published_time\" content=\"2023-07-14T11:22:08+00:00\" \/>\n<meta name=\"author\" content=\"Dr.benjamin anderson\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Verfasst von\" \/>\n\t<meta name=\"twitter:data1\" content=\"Dr.benjamin anderson\" \/>\n\t<meta name=\"twitter:label2\" content=\"Gesch\u00e4tzte Lesezeit\" \/>\n\t<meta name=\"twitter:data2\" content=\"2\u00a0Minuten\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"WebPage\",\"@id\":\"https:\/\/statorials.org\/nl\/wmape-in-r\/\",\"url\":\"https:\/\/statorials.org\/nl\/wmape-in-r\/\",\"name\":\"Hoe WMAPE in R te berekenen (met voorbeeld) \u2013 Statorials\",\"isPartOf\":{\"@id\":\"https:\/\/statorials.org\/nl\/#website\"},\"datePublished\":\"2023-07-14T11:22:08+00:00\",\"dateModified\":\"2023-07-14T11:22:08+00:00\",\"author\":{\"@id\":\"https:\/\/statorials.org\/nl\/#\/schema\/person\/d4b8842173cca1bb62cdec41860e4219\"},\"description\":\"In deze tutorial wordt uitgelegd hoe u WMAPE (gewogen gemiddelde absolute procentuele fout) in R kunt berekenen, inclusief voorbeelden.\",\"breadcrumb\":{\"@id\":\"https:\/\/statorials.org\/nl\/wmape-in-r\/#breadcrumb\"},\"inLanguage\":\"de\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/statorials.org\/nl\/wmape-in-r\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/statorials.org\/nl\/wmape-in-r\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Thuis\",\"item\":\"https:\/\/statorials.org\/nl\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Hoe wmape in r te berekenen (met voorbeeld)\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\/\/statorials.org\/nl\/#website\",\"url\":\"https:\/\/statorials.org\/nl\/\",\"name\":\"Statorials\",\"description\":\"Uw gids voor statistische competentie\",\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/statorials.org\/nl\/?s={search_term_string}\"},\"query-input\":\"required name=search_term_string\"}],\"inLanguage\":\"de\"},{\"@type\":\"Person\",\"@id\":\"https:\/\/statorials.org\/nl\/#\/schema\/person\/d4b8842173cca1bb62cdec41860e4219\",\"name\":\"Dr.benjamin anderson\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"de\",\"@id\":\"https:\/\/statorials.org\/nl\/#\/schema\/person\/image\/\",\"url\":\"http:\/\/statorials.org\/nl\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg\",\"contentUrl\":\"http:\/\/statorials.org\/nl\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg\",\"caption\":\"Dr.benjamin anderson\"},\"description\":\"Ik ben Benjamin, een gepensioneerde hoogleraar statistiek die nu een toegewijde Statorials-lesgever is. Ik heb uitgebreide ervaring en expertise op het gebied van statistiek en ik ben vastbesloten om mijn kennis te delen met studenten via Statorials. Lees verder\",\"sameAs\":[\"http:\/\/statorials.org\/nl\"]}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"Hoe WMAPE in R te berekenen (met voorbeeld) \u2013 Statorials","description":"In deze tutorial wordt uitgelegd hoe u WMAPE (gewogen gemiddelde absolute procentuele fout) in R kunt berekenen, inclusief voorbeelden.","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/statorials.org\/nl\/wmape-in-r\/","og_locale":"de_DE","og_type":"article","og_title":"Hoe WMAPE in R te berekenen (met voorbeeld) \u2013 Statorials","og_description":"In deze tutorial wordt uitgelegd hoe u WMAPE (gewogen gemiddelde absolute procentuele fout) in R kunt berekenen, inclusief voorbeelden.","og_url":"https:\/\/statorials.org\/nl\/wmape-in-r\/","og_site_name":"Statorials","article_published_time":"2023-07-14T11:22:08+00:00","author":"Dr.benjamin anderson","twitter_card":"summary_large_image","twitter_misc":{"Verfasst von":"Dr.benjamin anderson","Gesch\u00e4tzte Lesezeit":"2\u00a0Minuten"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"WebPage","@id":"https:\/\/statorials.org\/nl\/wmape-in-r\/","url":"https:\/\/statorials.org\/nl\/wmape-in-r\/","name":"Hoe WMAPE in R te berekenen (met voorbeeld) \u2013 Statorials","isPartOf":{"@id":"https:\/\/statorials.org\/nl\/#website"},"datePublished":"2023-07-14T11:22:08+00:00","dateModified":"2023-07-14T11:22:08+00:00","author":{"@id":"https:\/\/statorials.org\/nl\/#\/schema\/person\/d4b8842173cca1bb62cdec41860e4219"},"description":"In deze tutorial wordt uitgelegd hoe u WMAPE (gewogen gemiddelde absolute procentuele fout) in R kunt berekenen, inclusief voorbeelden.","breadcrumb":{"@id":"https:\/\/statorials.org\/nl\/wmape-in-r\/#breadcrumb"},"inLanguage":"de","potentialAction":[{"@type":"ReadAction","target":["https:\/\/statorials.org\/nl\/wmape-in-r\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/statorials.org\/nl\/wmape-in-r\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Thuis","item":"https:\/\/statorials.org\/nl\/"},{"@type":"ListItem","position":2,"name":"Hoe wmape in r te berekenen (met voorbeeld)"}]},{"@type":"WebSite","@id":"https:\/\/statorials.org\/nl\/#website","url":"https:\/\/statorials.org\/nl\/","name":"Statorials","description":"Uw gids voor statistische competentie","potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/statorials.org\/nl\/?s={search_term_string}"},"query-input":"required name=search_term_string"}],"inLanguage":"de"},{"@type":"Person","@id":"https:\/\/statorials.org\/nl\/#\/schema\/person\/d4b8842173cca1bb62cdec41860e4219","name":"Dr.benjamin anderson","image":{"@type":"ImageObject","inLanguage":"de","@id":"https:\/\/statorials.org\/nl\/#\/schema\/person\/image\/","url":"http:\/\/statorials.org\/nl\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg","contentUrl":"http:\/\/statorials.org\/nl\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg","caption":"Dr.benjamin anderson"},"description":"Ik ben Benjamin, een gepensioneerde hoogleraar statistiek die nu een toegewijde Statorials-lesgever is. Ik heb uitgebreide ervaring en expertise op het gebied van statistiek en ik ben vastbesloten om mijn kennis te delen met studenten via Statorials. Lees verder","sameAs":["http:\/\/statorials.org\/nl"]}]}},"yoast_meta":{"yoast_wpseo_title":"","yoast_wpseo_metadesc":"","yoast_wpseo_canonical":""},"_links":{"self":[{"href":"https:\/\/statorials.org\/nl\/wp-json\/wp\/v2\/posts\/3968","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/statorials.org\/nl\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/statorials.org\/nl\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/statorials.org\/nl\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/statorials.org\/nl\/wp-json\/wp\/v2\/comments?post=3968"}],"version-history":[{"count":0,"href":"https:\/\/statorials.org\/nl\/wp-json\/wp\/v2\/posts\/3968\/revisions"}],"wp:attachment":[{"href":"https:\/\/statorials.org\/nl\/wp-json\/wp\/v2\/media?parent=3968"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/statorials.org\/nl\/wp-json\/wp\/v2\/categories?post=3968"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/statorials.org\/nl\/wp-json\/wp\/v2\/tags?post=3968"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}