Publications by Leo Tzang
Final_Exam_Munkhzul_112035134
# Load libraries library(tidyverse) ## ── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ── ## ✔ dplyr 1.1.4 ✔ readr 2.1.4 ## ✔ forcats 1.0.0 ✔ stringr 1.5.1 ## ✔ ggplot2 3.4.4 ✔ tibble 3.2.1 ## ✔ lubridate 1.9.3 ✔ t...
25 sym R (9346 sym/20 pcs) 2 img
hw1 重新做
Load up required libraries: tidyverse, lubridate, tidyquant, readxl, writexl. Import the data files using read_excel() to import excel files. Based on bikes.xlsx, show “model” and “price” column with “price” in descending order. (Hint: use select(), arrange(), desc()) Based on bikes.xlsx, show “model” and “price” column with “...
424 sym R (1889 sym/6 pcs)
Exercise_3_munkhzul
#question_1 library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:base': ## ## intersect, setdiff, setequal, union responses <- read.csv("/cloud/project/multipleChoiceResponses.csv", header = TRUE, stringsAsFactors = FA...
27 sym R (8572 sym/19 pcs) 5 img
Documentshur
# Install the readxl package (if not already installed) # install.packages("readxl") # Load necessary libraries library(readxl) library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:base': ## ## intersect, setdiff, set...
9 sym R (1516 sym/6 pcs)
Week12_class_exercise
# In class exercise: Generate quantity sales and percentage by bikeshop_name ## Hints: select(bikeshop_name, catogery_1, catogery_2, quantity ) library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:base': ## ## inter...
9 sym R (1513 sym/6 pcs)
Publish Document
library(readxl) library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:base': ## ## intersect, setdiff, setequal, union your_data <- readxl::read_excel("bike_orderlines.xlsx") result <- your_data %>% group_by(bikeshop...
9 sym R (1291 sym/6 pcs)
Document
install.packages(c("readxl", "dplyr", "ggplot2")) ## Installing packages into '/cloud/lib/x86_64-pc-linux-gnu-library/4.3' ## (as 'lib' is unspecified) library(readxl) library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:ba...
11 sym R (1403 sym/7 pcs) 1 img
11/21
library(dplyr) library(ggplot2) library(magrittr) shop_revenue <- bikeshops %>% dplyr::group_by(bikeshops.name) %>% dplyr::summarize(total_revenue = sum(revenue, na.rm = TRUE)) %>% dplyr::arrange(desc(total_revenue)) top_10 <- head(shop_revenue, 10) other_shops <- shop_revenue %>% dplyr::anti_join(top_10, by = “bikeshops.name”) %>% dplyr::summa...
725 sym
Document
# Load necessary libraries library(magrittr) library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:base': ## ## intersect, setdiff, setequal, union library(tidyr) ## ## Attaching package: 'tidyr' ## The following objec...
26 sym R (6083 sym/23 pcs)
Publish Documentmidterm
# Load necessary libraries library(magrittr) library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:base': ## ## intersect, setdiff, setequal, union library(tidyr) ## ## Attaching package: 'tidyr' ## The following objec...
26 sym R (6083 sym/23 pcs)