復習 - 動的入力
CoddyのRジャーニー「基礎」セクションの一部 — レッスン 45/78。
チャレンジ
簡単ユーザーが "end" と入力するまで、入力を1つずつ読み込みます。各数値について、それが正か負かを確認してください。正の数のカウントと負の数のカウントの2つを個別に記録します。0はいずれのカテゴリーにもカウントしないでください。
ループが終了した後（"end" が入力されたとき）、cat() を使用して以下の形式でカウントを別々の行に出力してください：
Positive: X
Negative: Yここで、X は正の数のカウント、Y は負の数のカウントです。
例えば、入力が以下の場合：
5
-3
0
8
-1
-7
end出力は以下のようになります：
Positive: 2
Negative: 3正の数は 5 と 8 です（カウント: 2）。負の数は -3、-1、および -7 です（カウント: 3）。0はカウントされません。
自分で試してみよう
# 標準入力から入力を読み込む
con <- file("stdin", "r")
# カウンタを初期化
positive_count <- 0
negative_count <- 0
# TODO: ここにコードを記述してください
# "end" が入力されるまで数値を読み込むために repeat ループを使用します
# 各入力に対して：
# - "end" かどうかを確認し、ループを終了します
# - 数値に変換し、正か負かを確認します
# - 適切なカウンタを更新します（ゼロはカウントしません）
# 結果を出力
cat("Positive:", positive_count, "\n")
cat("Negative:", negative_count, "\n")