Chờ lần tung đầu tiên ra mặt sấp/ngửa

Bạn sẽ bắt đầu bằng cách mô phỏng một chuỗi lần tung đồng xu và "chờ" đến khi lần đầu tiên ra mặt ngửa (heads).

Bài tập này là một phần của khóa học

Nền tảng Xác suất với R

Mô phỏng 100 lần tung một đồng xu với xác suất ra mặt ngửa là 20%, và lưu vào biến flips. (Do đó, flips sẽ là một vector có độ dài 100).
Dùng which() để tìm trường hợp đầu tiên mà đồng xu cho kết quả mặt ngửa.

Hãy thử làm bài tập này bằng cách hoàn thành đoạn mã mẫu này.

# Simulate 100 instances of flipping a 20% coin
flips <- ___

# Use which to find the first case of 1 ("heads")
which(___)[1]