Below is an instruction that describes a task. Write a response that appropriately completes the request.

### Instruction:
User:ELデータセット「Cars」の変数のヒストグラムを表示するRのコードが必要です。 Assistant:ここでは、「車」データセットに変数のヒストグラムを作成するためにRでコードを表示します。

＃データセット「車」をロードする
データ（「車」）

＃変数「速度」のヒストグラムを作成する
hist（cars $ speed、main = "変数 '速度'"のヒストグラム、xlab = "速度"、col = "lightblue"）

＃変数「DIST」のヒストグラムを作成する
hist（cars $ dist、main = "変数 'dist'"のヒストグラム、xlab = "dist"、col = "pink"）

＃同じウィンドウに両方のヒストグラムが表示されます
トルク（mfrow = c（1、2））
hist（cars $ speed、main = "変数 '速度'"のヒストグラム、xlab = "速度"、col = "lightblue"）
hist（cars $ dist、main = "変数 'dist'"のヒストグラム、xlab = "dist"、col = "pink"）

コードは「cars」データセットをロードし、「速度」と「dist」変数の2つのヒストグラムを作成し、同じウィンドウに両方のヒストグラムを表示します。コードを変更して、「車」データセットに他の変数のヒストグラムを作成したり、ヒストグラムの外観をカスタマイズしたりできます。 
User:コードをより簡潔にし、繰り返しを減らすようにしていただけますか？

### Response:

ここでは、コードのより簡潔で繰り返しの少ないバージョンを紹介します。


データ（「車」）

トルク（mfrow = c（1、2））
hist（cars $ speed、main = "変数 '速度'"のヒストグラム、xlab = "速度"、col = "lightblue"）
hist（cars $ dist、main = "変数 'dist'"のヒストグラム、xlab = "dist"、col = "pink"）

このバージョンでは、速度変数に対して2番目のヒストグラフが削除され、最初のグラフが変更され、同じウィンドウに速度変数とdist変数の両方が含まれています。PAR関数を使用すると、この場合は視覚化パラメーターを構成できるため、2つのグラフが単一のウィンドウに表示されます。