利用R软件实现以下功能：本学期暑假时间是2023年7月8日-9月3日，计算从现在到暑假开始还有几天？本学期开学是2023年2月19日，计算今天是本学期的第几天？今年的北京林业大学学位委员会评定会议为两次，第一次是2023年6月25日，第二次是2023年7月14日，错过这两个日期，就错过今年的毕业季，计算现在距离第二次学位委员会会议还有几周？两次学位委员会会议分别是周几？并按格式输出“2023年秋季开学是9月4日，星期几；距离现在还有几周几天。”。

以下是使用R语言实现你所需功能的代码：

# 计算从现在到暑假开始还有几天
today <- Sys.Date()
summer_start <- as.Date("2023-07-08")
remaining_days <- as.integer(summer_start - today)

# 计算今天是本学期的第几天
start_date <- as.Date("2023-02-19")
day_number <- as.integer(today - start_date) + 1

# 计算现在距离第二次学位委员会会议还有几周
today <- Sys.Date()
second_meeting <- as.Date("2023-07-14")
remaining_weeks <- as.integer(second_meeting - today) %/% 7

# 获取两次学位委员会会议是周几
first_meeting <- as.Date("2023-06-25")
weekday_first <- format(first_meeting, "%A")
weekday_second <- format(second_meeting, "%A")

# 输出“2023年秋季开学是9月4日，星期几；距离现在还有几周几天。”
fall_start <- as.Date("2023-09-04")
remaining_time <- fall_start - today
remaining_weeks <- as.integer(remaining_time) %/% 7
remaining_days <- as.integer(remaining_time) %% 7
weekday_fall_start <- format(fall_start, "%A")

output <- paste("2023年秋季开学是9月4日，", weekday_fall_start, "；距离现在还有", remaining_weeks, "周", remaining_days, "天。")
print(output)

请注意，以上代码使用的是R语言来实现你所需的功能。确保你已经安装并正确配置了R环境。在运行代码之前，你需要逐行执行这些代码，或者将它们放在一个R脚本中运行。