{"id":3014,"date":"2023-07-19T15:30:27","date_gmt":"2023-07-19T15:30:27","guid":{"rendered":"https:\/\/statorials.org\/id\/fungsi-optimal-di-r\/"},"modified":"2023-07-19T15:30:27","modified_gmt":"2023-07-19T15:30:27","slug":"fungsi-optimal-di-r","status":"publish","type":"post","link":"https:\/\/statorials.org\/id\/fungsi-optimal-di-r\/","title":{"rendered":"Cara menggunakan fungsi optim di r (2 contoh)"},"content":{"rendered":"<p><\/p>\n<hr>\n<p><span style=\"color: #000000;\">Anda dapat menggunakan fungsi <strong>optim<\/strong> di R untuk optimasi umum.<\/span><\/p>\n<p> <span style=\"color: #000000;\">Fungsi ini menggunakan sintaks dasar berikut:<\/span><\/p>\n<pre style=\"background-color: #ececec; font-size: 15px;\"> <strong>optim(by, fn, data, ...)\n<\/strong><\/pre>\n<p> <span style=\"color: #000000;\">Emas:<\/span><\/p>\n<ul>\n<li> <span style=\"color: #000000;\"><strong>by<\/strong> : Nilai awal dari parameter yang akan dioptimalkan<\/span><\/li>\n<li> <span style=\"color: #000000;\"><strong>fn<\/strong> : Fungsi untuk meminimalkan atau memaksimalkan<\/span><\/li>\n<li> <span style=\"color: #000000;\"><strong>data<\/strong> : Nama objek di R yang berisi data<\/span><\/li>\n<\/ul>\n<p> <span style=\"color: #000000;\">Contoh berikut menunjukkan cara menggunakan fungsi ini dalam skenario berikut:<\/span><\/p>\n<p> <span style=\"color: #000000;\"><strong>1.<\/strong> Temukan koefisien model regresi linier.<\/span><\/p>\n<p> <span style=\"color: #000000;\"><strong>2.<\/strong> Temukan koefisien model regresi kuadrat.<\/span><\/p>\n<p> <span style=\"color: #000000;\">Ayo pergi!<\/span><\/p>\n<h3> <span style=\"color: #000000;\"><strong>Contoh 1: Mencari koefisien untuk model regresi linier<\/strong><\/span><\/h3>\n<p> <span style=\"color: #000000;\">Kode berikut menunjukkan cara menggunakan fungsi <strong>optim()<\/strong> untuk mencari koefisien model regresi linier dengan meminimalkan jumlah sisa kuadrat:<\/span><\/p>\n<pre style=\"background-color: #ececec; font-size: 15px;\"> <strong><span style=\"color: #008080;\"><span style=\"color: #000000;\"><span style=\"color: #008080;\">#create data frame\n<\/span>df &lt;- data.frame(x=c(1, 3, 3, 5, 6, 7, 9, 12),\n                 y=c(4, 5, 8, 6, 9, 10, 13, 17))\n\n<span style=\"color: #008080;\">#define function to minimize residual sum of squares\n<\/span>min_residuals &lt;- <span style=\"color: #008000;\">function<\/span> (data, par) {\n                   <span style=\"color: #008000;\">with<\/span> (data, sum((par[1] + par[2] * x - y)^2))\n}\n\n<span style=\"color: #008080;\">#find coefficients of linear regression model\n<\/span>optim(par=c(0, 1), fn=min_residuals, data=df)\n\n$by\n[1] 2.318592 1.162012\n\n$value\n[1] 11.15084\n\n$counts\nfunction gradient \n      79 NA \n\n$convergence\n[1] 0\n\n$message\nNULL\n<\/span><\/span><\/strong><\/pre>\n<p> <span style=\"color: #000000;\">Dengan menggunakan nilai yang dikembalikan di bawah <strong>$par<\/strong> , kita dapat menulis model regresi linier berikut:<\/span><\/p>\n<p> <span style=\"color: #000000;\">kamu = 2,318 + 1,162x<\/span><\/p>\n<p> <span style=\"color: #000000;\">Kita dapat memverifikasi kebenarannya dengan menggunakan fungsi <strong>lm()<\/strong> bawaan di R untuk menghitung koefisien regresi:<\/span><\/p>\n<pre style=\"background-color: #ececec; font-size: 15px;\"> <strong><span style=\"color: #008080;\">#find coefficients of linear regression model using lm() function\n<span style=\"color: #000000;\">lm(y ~ x, data=df)\n\nCall:\nlm(formula = y ~ x, data = df)\n\nCoefficients:\n(Intercept) x  \n      2,318 1,162\n<\/span><\/span><\/strong><\/pre>\n<p> <span style=\"color: #000000;\">Nilai koefisien ini sesuai dengan yang kami hitung menggunakan fungsi <strong>optim()<\/strong> .<\/span><\/p>\n<h3> <span style=\"color: #000000;\"><strong>Contoh 2: Mencari Koefisien untuk Model Regresi Kuadrat<\/strong><\/span><\/h3>\n<p> <span style=\"color: #000000;\">Kode berikut menunjukkan cara menggunakan fungsi <strong>optim()<\/strong> untuk mencari koefisien <a href=\"https:\/\/statorials.org\/id\/regresi-kuadrat-r\/\" target=\"_blank\" rel=\"noopener\">model regresi kuadrat<\/a> dengan meminimalkan jumlah sisa kuadrat:<\/span><\/p>\n<pre style=\"background-color: #ececec; font-size: 15px;\"> <strong><span style=\"color: #008080;\"><span style=\"color: #000000;\"><span style=\"color: #008080;\"><span style=\"color: #000000;\"><span style=\"color: #008080;\">#create data frame<\/span>\ndf &lt;- data. <span style=\"color: #3366ff;\">frame<\/span> (x=c(6, 9, 12, 14, 30, 35, 40, 47, 51, 55, 60),\n                 y=c(14, 28, 50, 70, 89, 94, 90, 75, 59, 44, 27))<\/span>\n\n<span style=\"color: #000000;\"><span style=\"color: #008080;\">#define function to minimize residual sum of squares\n<\/span>min_residuals &lt;- <span style=\"color: #008000;\">function<\/span> (data, par) {\n                   <span style=\"color: #008000;\">with<\/span> (data, sum((par[1] + par[2]*x + par[3]*x^2 - y)^2))\n}\n\n<span style=\"color: #008080;\">#find coefficients of quadratic regression model\n<\/span>optim(par=c(0, 0, 0), fn=min_residuals, data=df)\n\n$by\n[1] -18.261320 6.744531 -0.101201\n\n$value\n[1] 309.3412\n\n$counts\nfunction gradient \n     218 NA \n\n$convergence\n[1] 0\n\n$message\nNULL<\/span><\/span><\/span><\/span><\/strong><\/pre>\n<p> <span style=\"color: #000000;\">Dengan menggunakan nilai yang dikembalikan di bawah <strong>$par<\/strong> , kita dapat menulis model regresi kuadrat berikut ini:<\/span><\/p>\n<p> <span style=\"color: #000000;\">kamu = -18,261 + 6,744x \u2013 0,101x <sup>2<\/sup><\/span><\/p>\n<p> <span style=\"color: #000000;\">Kita dapat memverifikasi kebenarannya menggunakan fungsi <strong>lm()<\/strong> bawaan di R:<\/span><\/p>\n<pre style=\"background-color: #ececec; font-size: 15px;\"> <strong><span style=\"color: #008080;\"><span style=\"color: #000000;\"><span style=\"color: #008080;\">#create data frame\n<\/span>df &lt;- data. <span style=\"color: #3366ff;\">frame<\/span> (x=c(6, 9, 12, 14, 30, 35, 40, 47, 51, 55, 60),\n                 y=c(14, 28, 50, 70, 89, 94, 90, 75, 59, 44, 27))\n\n<span style=\"color: #008080;\">#create a new variable for x^2\n<\/span>df$x2 &lt;- df$x^2\n\n<span style=\"color: #008080;\">#fit quadratic regression model\n<\/span>quadraticModel &lt;- lm(y ~ x + x2, data=df)\n\n<span style=\"color: #008080;\">#display coefficients of quadratic regression model\n<\/span>summary(quadraticModel)$coef\n\n               Estimate Std. Error t value Pr(&gt;|t|)\n(Intercept) -18.2536400 6.185069026 -2.951243 1.839072e-02\nx 6.7443581 0.485515334 13.891133 6.978849e-07\nx2 -0.1011996 0.007460089 -13.565470 8.378822e-07<\/span><\/span><\/strong><\/pre>\n<p> <span style=\"color: #000000;\">Nilai koefisien ini sesuai dengan yang kami hitung menggunakan fungsi <strong>optim()<\/strong> .<\/span><\/p>\n<h3> <span style=\"color: #000000;\"><strong>Sumber daya tambahan<\/strong><\/span><\/h3>\n<p> <span style=\"color: #000000;\">Tutorial berikut menjelaskan cara melakukan operasi umum lainnya di R:<\/span><\/p>\n<p> <a href=\"https:\/\/statorials.org\/id\/regresi-linier-sederhana-di-r\/\" target=\"_blank\" rel=\"noopener\">Cara melakukan regresi linier sederhana di R<\/a><br \/> <a href=\"https:\/\/statorials.org\/id\/regresi-linier-berganda-r\/\" target=\"_blank\" rel=\"noopener\">Cara melakukan regresi linier berganda di R<\/a><br \/> <a href=\"https:\/\/statorials.org\/id\/menafsirkan-keluaran-regresi-di-r\/\" target=\"_blank\" rel=\"noopener\">Bagaimana menafsirkan keluaran regresi di R<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"<p>Anda dapat menggunakan fungsi optim di R untuk optimasi umum. Fungsi ini menggunakan sintaks dasar berikut: optim(by, fn, data, &#8230;) Emas: by : Nilai awal dari parameter yang akan dioptimalkan fn : Fungsi untuk meminimalkan atau memaksimalkan data : Nama objek di R yang berisi data Contoh berikut menunjukkan cara menggunakan fungsi ini dalam skenario [&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":[],"yoast_head":"<!-- This site is optimized with the Yoast SEO plugin v21.5 - https:\/\/yoast.com\/wordpress\/plugins\/seo\/ -->\n<title>Cara menggunakan fungsi optim di R (2 contoh) - Statorials<\/title>\n<meta name=\"description\" content=\"Tutorial ini menjelaskan cara menggunakan fungsi optim() di R, dengan beberapa contoh.\" \/>\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\/id\/fungsi-optimal-di-r\/\" \/>\n<meta property=\"og:locale\" content=\"id_ID\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"Cara menggunakan fungsi optim di R (2 contoh) - Statorials\" \/>\n<meta property=\"og:description\" content=\"Tutorial ini menjelaskan cara menggunakan fungsi optim() di R, dengan beberapa contoh.\" \/>\n<meta property=\"og:url\" content=\"https:\/\/statorials.org\/id\/fungsi-optimal-di-r\/\" \/>\n<meta property=\"og:site_name\" content=\"Statorials\" \/>\n<meta property=\"article:published_time\" content=\"2023-07-19T15:30:27+00:00\" \/>\n<meta name=\"author\" content=\"Benjamin anderson\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Ditulis oleh\" \/>\n\t<meta name=\"twitter:data1\" content=\"Benjamin anderson\" \/>\n\t<meta name=\"twitter:label2\" content=\"Estimasi waktu membaca\" \/>\n\t<meta name=\"twitter:data2\" content=\"2 menit\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"WebPage\",\"@id\":\"https:\/\/statorials.org\/id\/fungsi-optimal-di-r\/\",\"url\":\"https:\/\/statorials.org\/id\/fungsi-optimal-di-r\/\",\"name\":\"Cara menggunakan fungsi optim di R (2 contoh) - Statorials\",\"isPartOf\":{\"@id\":\"https:\/\/statorials.org\/id\/#website\"},\"datePublished\":\"2023-07-19T15:30:27+00:00\",\"dateModified\":\"2023-07-19T15:30:27+00:00\",\"author\":{\"@id\":\"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81\"},\"description\":\"Tutorial ini menjelaskan cara menggunakan fungsi optim() di R, dengan beberapa contoh.\",\"breadcrumb\":{\"@id\":\"https:\/\/statorials.org\/id\/fungsi-optimal-di-r\/#breadcrumb\"},\"inLanguage\":\"id\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/statorials.org\/id\/fungsi-optimal-di-r\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/statorials.org\/id\/fungsi-optimal-di-r\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Home\",\"item\":\"https:\/\/statorials.org\/id\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Cara menggunakan fungsi optim di r (2 contoh)\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\/\/statorials.org\/id\/#website\",\"url\":\"https:\/\/statorials.org\/id\/\",\"name\":\"Statorials\",\"description\":\"Panduan anda untuk kompetensi statistik!\",\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/statorials.org\/id\/?s={search_term_string}\"},\"query-input\":\"required name=search_term_string\"}],\"inLanguage\":\"id\"},{\"@type\":\"Person\",\"@id\":\"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81\",\"name\":\"Benjamin anderson\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"id\",\"@id\":\"https:\/\/statorials.org\/id\/#\/schema\/person\/image\/\",\"url\":\"http:\/\/statorials.org\/id\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg\",\"contentUrl\":\"http:\/\/statorials.org\/id\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg\",\"caption\":\"Benjamin anderson\"},\"description\":\"Halo, saya Benjamin, pensiunan profesor statistika yang menjadi guru Statorial yang berdedikasi. Dengan pengalaman dan keahlian yang luas di bidang statistika, saya ingin berbagi ilmu untuk memberdayakan mahasiswa melalui Statorials. Baca selengkapnya\",\"sameAs\":[\"http:\/\/statorials.org\/id\"]}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"Cara menggunakan fungsi optim di R (2 contoh) - Statorials","description":"Tutorial ini menjelaskan cara menggunakan fungsi optim() di R, dengan beberapa contoh.","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\/id\/fungsi-optimal-di-r\/","og_locale":"id_ID","og_type":"article","og_title":"Cara menggunakan fungsi optim di R (2 contoh) - Statorials","og_description":"Tutorial ini menjelaskan cara menggunakan fungsi optim() di R, dengan beberapa contoh.","og_url":"https:\/\/statorials.org\/id\/fungsi-optimal-di-r\/","og_site_name":"Statorials","article_published_time":"2023-07-19T15:30:27+00:00","author":"Benjamin anderson","twitter_card":"summary_large_image","twitter_misc":{"Ditulis oleh":"Benjamin anderson","Estimasi waktu membaca":"2 menit"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"WebPage","@id":"https:\/\/statorials.org\/id\/fungsi-optimal-di-r\/","url":"https:\/\/statorials.org\/id\/fungsi-optimal-di-r\/","name":"Cara menggunakan fungsi optim di R (2 contoh) - Statorials","isPartOf":{"@id":"https:\/\/statorials.org\/id\/#website"},"datePublished":"2023-07-19T15:30:27+00:00","dateModified":"2023-07-19T15:30:27+00:00","author":{"@id":"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81"},"description":"Tutorial ini menjelaskan cara menggunakan fungsi optim() di R, dengan beberapa contoh.","breadcrumb":{"@id":"https:\/\/statorials.org\/id\/fungsi-optimal-di-r\/#breadcrumb"},"inLanguage":"id","potentialAction":[{"@type":"ReadAction","target":["https:\/\/statorials.org\/id\/fungsi-optimal-di-r\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/statorials.org\/id\/fungsi-optimal-di-r\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Home","item":"https:\/\/statorials.org\/id\/"},{"@type":"ListItem","position":2,"name":"Cara menggunakan fungsi optim di r (2 contoh)"}]},{"@type":"WebSite","@id":"https:\/\/statorials.org\/id\/#website","url":"https:\/\/statorials.org\/id\/","name":"Statorials","description":"Panduan anda untuk kompetensi statistik!","potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/statorials.org\/id\/?s={search_term_string}"},"query-input":"required name=search_term_string"}],"inLanguage":"id"},{"@type":"Person","@id":"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81","name":"Benjamin anderson","image":{"@type":"ImageObject","inLanguage":"id","@id":"https:\/\/statorials.org\/id\/#\/schema\/person\/image\/","url":"http:\/\/statorials.org\/id\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg","contentUrl":"http:\/\/statorials.org\/id\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg","caption":"Benjamin anderson"},"description":"Halo, saya Benjamin, pensiunan profesor statistika yang menjadi guru Statorial yang berdedikasi. Dengan pengalaman dan keahlian yang luas di bidang statistika, saya ingin berbagi ilmu untuk memberdayakan mahasiswa melalui Statorials. Baca selengkapnya","sameAs":["http:\/\/statorials.org\/id"]}]}},"yoast_meta":{"yoast_wpseo_title":"","yoast_wpseo_metadesc":"","yoast_wpseo_canonical":""},"_links":{"self":[{"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/posts\/3014"}],"collection":[{"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/comments?post=3014"}],"version-history":[{"count":0,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/posts\/3014\/revisions"}],"wp:attachment":[{"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/media?parent=3014"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/categories?post=3014"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/tags?post=3014"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}