蔵書検索

CoddyのRジャーニー「オブジェクト指向プログラミング」セクションの一部。レッスン 53/57。

チャレンジ

簡単

search_titles(text)メソッドを通じてSEARCHコマンドを追加してください。前の手順のすべてのコマンドが、これまでどおり正確に動作するようにしてください。

SEARCH <text>：テキストにはスペースを含めることができます。大文字と小文字を区別せず、書籍IDの順に、タイトルにそのテキストを含む書籍ごとに1行で応答してください。Dune (available)またはEmma (borrowed by ada)のようにします。一致するものがない場合はno matchesと応答してください。

提供されたコードは、すべての入力行をlib$handle(line)に送り、返された各応答をそれぞれ独自の行に出力します。メンバー名は小文字1語、書籍IDは整数であり、入力にはここまでに説明したコマンドだけが含まれます。それ以外のコマンドにはunknown commandと応答してください。

コードはBook.R、Member.R、Library.Rに記述します。main.Rには提供された入出力コードが含まれており、編集できません。

自分で試してみよう

source("Book.R")
source("Member.R")
source("Library.R")

# 提供された入出力コード: そのままにしておく
input <- suppressWarnings(readLines(file("stdin")))
lib <- Library$new()
for (line in input) {
  for (reply in lib$handle(line)) cat(reply, "\n", sep = "")
}