{"id":4297,"date":"2024-08-21T12:40:54","date_gmt":"2024-08-21T20:40:54","guid":{"rendered":"https:\/\/crm270s.abramjmeister.com\/?p=4297"},"modified":"2024-08-21T12:40:54","modified_gmt":"2024-08-21T20:40:54","slug":"%ec%a7%80%ec%b6%9c-%ec%95%a1%ec%88%98-csv-month-by-month-item-sum-by-r","status":"publish","type":"post","link":"https:\/\/crm270s.mycpamytax.com\/?p=4297","title":{"rendered":"\uc9c0\ucd9c-\uc561\uc218.csv month by month ITEM sum by R"},"content":{"rendered":"\n<pre class=\"wp-block-code\"><code>library(RSQLite)\nlibrary(DBI)\nlibrary(tidyr)  # For reshaping the data\nlibrary(readr)  # For exporting data to CSV\n\n# Define the path to your SQLite database\ndb_path &lt;- \"\/home\/jbyungrokim\/CSV\/CSV.db\"\n\n# Connect to the SQLite database\nconn &lt;- dbConnect(RSQLite::SQLite(), dbname = db_path)\n\n# Adjust the query to calculate the sum for each item by year and month\nquery &lt;- \"\nSELECT \n    strftime('%Y-%m', '20' || substr(Date_Transaction, 7, 2) || '-' || substr(Date_Transaction, 1, 2) || '-' || substr(Date_Transaction, 4, 2)) AS YearMonth,\n    Item, \n    SUM(Pay_Amount) AS Total_Spent\nFROM \n    '\uc9c0\ucd9c-\uc561\uc218_2024_08_20'\nGROUP BY \n    YearMonth, Item\nORDER BY \n    YearMonth, Total_Spent DESC;\n\"\n\n# Execute the query and store the result in a data frame\nmonthly_sum &lt;- dbGetQuery(conn, query)\n\n# Print the result\nprint(\"Sum of Pay_Amount by Item for each Year\/Month:\")\nprint(monthly_sum)\n\n# Reshape the data into a wide format for better readability in a spreadsheet\nmonthly_sum_wide &lt;- spread(monthly_sum, YearMonth, Total_Spent, fill = 0)\n\n# Export the data to a CSV file\noutput_path &lt;- \"\/home\/jbyungrokim\/CSV\/monthly_sum_by_item.csv\"\nwrite_csv(monthly_sum_wide, output_path)\n\n# Print the location of the saved file\nprint(paste(\"Data has been saved to:\", output_path))\n\n# Close the connection to the SQLite database\ndbDisconnect(conn)\n<\/code><\/pre>\n","protected":false},"excerpt":{"rendered":"","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"_et_pb_use_builder":"","_et_pb_old_content":"","_et_gb_content_width":"","footnotes":""},"categories":[26],"tags":[],"class_list":["post-4297","post","type-post","status-publish","format-standard","hentry","category-codes"],"_links":{"self":[{"href":"https:\/\/crm270s.mycpamytax.com\/index.php?rest_route=\/wp\/v2\/posts\/4297","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/crm270s.mycpamytax.com\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/crm270s.mycpamytax.com\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/crm270s.mycpamytax.com\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/crm270s.mycpamytax.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=4297"}],"version-history":[{"count":0,"href":"https:\/\/crm270s.mycpamytax.com\/index.php?rest_route=\/wp\/v2\/posts\/4297\/revisions"}],"wp:attachment":[{"href":"https:\/\/crm270s.mycpamytax.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=4297"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/crm270s.mycpamytax.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=4297"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/crm270s.mycpamytax.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=4297"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}