drinking_age_count <- sum(data$drinking_age == 1, na.rm = TRUE) non_drinking_age_count <- sum(data$drinking_age == 0, na.rm = TRUE) cat("Drinking Age Counts\n") cat ...
一部の結果でアクセス不可の可能性があるため、非表示になっています。
アクセス不可の結果を表示する一部の結果でアクセス不可の可能性があるため、非表示になっています。
アクセス不可の結果を表示する