R语言筛选时间戳最后n天数据求助（无法使用tail()）

Hey there! Since you're new to R and already know how to handle this in Python, let's walk through exactly how to filter the last n days of your timestamped data—no tail() required (since you've got multiple entries per day, that wouldn't work anyway!).

First: Let's Set Up Your Example Data #

First, let's recreate your sample dataframe so you can test the code directly:

df <- data.frame(
  f1 = c(1,2,1,2,1,2,1,2,1,2,1,2,1,2),
  f2 = c(2,3,2,3,2,3,2,3,2,3,2,3,2,3),
  f3 = c(3,5,3,5,3,5,3,5,3,5,3,5,3,5),
  timestamp = c("2020-10-02 14:36:03", "2020-10-03 14:26:03",
                "2020-10-05 14:36:03", "2020-10-05 14:26:03",
                "2020-10-07 14:36:03", "2020-10-10 14:26:03",
                "2020-10-12 14:36:03", "2020-10-13 14:26:03",
                "2020-10-15 14:36:03", "2020-10-16 14:26:03",
                "2020-10-22 14:36:03", "2020-10-25 14:26:03",
                "2020-10-26 14:36:03", "2020-10-31 14:26:03")
)

Method 1: Tidyverse (Recommended for Readability) #

If you're open to using popular R packages (most R users love this workflow), dplyr (for data manipulation) and lubridate (for easy date handling) make this super straightforward.

1. Install and load the packages first (only need to install once):

install.packages(c("dplyr", "lubridate"))
library(dplyr)
library(lubridate)

2. Convert your timestamp column to a proper datetime type, then filter for the last n days:

n_days <- 16 # Your target number of days

filtered_df <- df %>%
  # Convert timestamp from text to datetime format
  mutate(timestamp = ymd_hms(timestamp)) %>%
  # Filter rows where timestamp is >= (latest date minus n-1 days)
  # We use n-1 here because we want to include the full 16 days (10/16 to 10/31)
  filter(timestamp >= (max(timestamp) - days(n_days - 1)))

# View the result
filtered_df

This will give you exactly the output you're looking for—all entries from October 16th onwards.

Method 2: Base R (No Extra Packages) #

If you prefer not to install new packages, you can do this with base R functions. The key is converting your timestamp to a POSIXct datetime type and calculating the cutoff time manually.

n_days <- 16

# Convert timestamp text to datetime
df$timestamp <- as.POSIXct(df$timestamp, format = "%Y-%m-%d %H:%M:%S")

# Calculate the cutoff time: latest timestamp minus (n-1) days (1 day = 86400 seconds)
cutoff_time <- max(df$timestamp) - (n_days - 1) * 86400

# Filter rows where timestamp is after or equal to the cutoff
filtered_df_base <- df[df$timestamp >= cutoff_time, ]

# View the result
filtered_df_base

Key Notes #

• Why no tail()? As you noticed, tail(n) just grabs the last n rows, which doesn't account for multiple entries per day. This method filters all rows within your desired date range, regardless of how many entries per day there are.
• Adjusting the cutoff: If you meant "the last n full calendar days" (instead of including the partial day of the latest timestamp), you could floor the max timestamp to midnight first: floor_date(max(timestamp), "day") - days(n_days - 1).

内容的提问来源于stack exchange，提问作者Syed Ahmed