我在“Activity_Date_Minute”列中匯入了包含日期的 CSV。例如，日期值為“04/12/2016 01:12:00”。現在，當我將 .csv 讀入資料框并僅提取日期時，列中的日期為 4-12-20。有人可以幫助如何在單獨的列中獲取 mm-dd-yyyy 中的日期嗎？
嘗試了以下代碼。期望看到帶有日期的列，例如 04/12/2016 (mm/dd/yyyy)。
#Installing packages
install.packages("tidyverse")
library(tidyverse)
install.packages('ggplot2')
library(ggplot2)
install.packages("dplyr")
library(dplyr)
install.packages("lubridate")
library(lubridate)
##Installing packages
install.packages("tidyverse")
library(tidyverse)
install.packages('ggplot2')
library(ggplot2)
install.packages("dplyr")
library(dplyr)
install.packages("lubridate")
library(lubridate)
##Reading minute-wise METs into "minutewiseMET_Records" and summarizing MET per day for all the IDs
minutewiseMET_Records <- read.csv("minuteMETsNarrow_merged.csv")
str(minutewiseMET_Records)
## converting column ID to character,Activity_Date_Minute to date
minutewiseMET_Records$Id <- as.character(minutewiseMET_Records$Id)
minutewiseMET_Records$Date <- as.Date(minutewiseMET_Records$Activity_Date_Minute)
str(minutewiseMET_Records)
控制臺如下：
minutewiseMET_Records <- read.csv（“minuteMETsNarrow_merged.csv”）str（minutewiseMET_Records）'data.frame'：1048575 obs。3 個變數：$ Id：num 1.5e 09 1.5e 09 1.5e 09 1.5e 09 1.5e 09 ... $ Activity_Date_Minute：chr "04/12/2016 00:00" "04/12/ 2016 00:01" "04/12/2016 00:02" "04/12/2016 00:03" ... $ METs：int 10 10 10 10 10 12 12 12 12 12 ...
將列 ID 轉換為字符，Activity_Date_Minute 轉換為日期
minutewiseMET_Records$Id <- as.character（minutewiseMET_Records$Id） minutewiseMET_Records$Date <- as.Date（minutewiseMET_Records$Activity_Date_Minute）
將列 ID 轉換為字符，Activity_Date_Minute 轉換為日期
minutewiseMET_Records$Id <- as.character(minutewiseMET_Records$Id) minutewiseMET_Records$Date <- as.Date(minutewiseMET_Records$Activity_Date_Minute) str(minutewiseMET_Records) 'data.frame': 1048575 obs。4 個變數：$ Id：chr“1503960366”“1503960366”“1503960366”“1503960366”... $ Activity_Date_Minute：chr“04/12/2016 00:00”“04/12/2016 00:01”“04 / 12/2016 00:02" "04/12/2016 00:03" ... $ METs：int 10 10 10 10 10 12 12 12 12 12 ... $ Date：日期，格式："4-12-20 ” “4-12-20” ...
uj5u.com熱心網友回復：
我認為這對你有用
minutewiseMET_Records$Date <- format(as.Date(minutewiseMET_Records$Activity_Date_Minute, format = "%d/%m/%Y"),"%m/%d/%Y")
首先，您必須告訴 R 初始資料的格式。然后，你問它你想要的輸出格式是什么。
uj5u.com熱心網友回復：
Activity_Date_Minute不是初始資料中的日期時間，而是一個字符。因此，您必須先將其轉換為日期時間（例如，使用lubridate::mdy_hm()），然后使用as.Date().
library(dplyr)
library(lubridate)
minutewiseMET_Records %>%
mutate(
Activity_Date_Minute = mdy_hm(Activity_Date_Minute),
Activity_Date = as.Date(Activity_Date_Minute)
)
# A tibble: 4 × 2
Activity_Date_Minute Activity_Date
<dttm> <date>
1 2016-04-12 00:00:00 2016-04-12
2 2016-04-12 00:01:00 2016-04-12
3 2016-04-12 00:02:00 2016-04-12
4 2016-04-12 00:03:00 2016-04-12
轉載請註明出處，本文鏈接：https://www.uj5u.com/qukuanlian/533669.html
標籤：r日期约会时间数据操作