Fix camera model on irtsensor

[YoheiKakiuchi]

随分前の話になりますが、irtsensorのカメラモデルで正しい画像とポイントクラウドを取得できるようにしました。
#48

[snozawa]

Is this necessary? ((unix::usleep (* 200 1000)))

[snozawa]

irteus/test以下でできそうなテストがありそうであれば、追加しいただくと良いかもしれません。
ちなみにこの辺はno-displayだと動かないでしょうか？

[YoheiKakiuchi]

ちなみにこの辺はno-displayだと動かないでしょうか？

viewerが上がらないとダメだと思います。

[snozawa]

了解です

[k-okada]

-  (:get-image (vwr &key (points) (colors))
+  (:get-image
+   (&key (with-points) (with-colors))

API 変わっていますね．そういうcommitはちゃんとつAPI壊していますと言ってくれると嬉しいです．

[k-okada]

これ，ポイントクラウド出ていますか？
c6c5941#diff-5590274a5dcb5b5abc3abdc290bfaacbR36
見てもカメラしか表示されていない気がするんですが．．．

[YoheiKakiuchi]

API 変わっていますね．そういうcommitはちゃんとつAPI壊していますと言ってくれると嬉しいです．

すいません。ノーマークでした。

これ，ポイントクラウド出ていますか？

以下をすると、ポイントだけ見えると思います。

(sample-get-camera-image-2)
(objects (list *points* *camera-model*))

プログラムの中は、以下になっていて、点群とobjが完全に重なる（色もついている）
で見かけ上分からないです。

(objects (list *points* *obj1* *obj2* *obj3* *camera-model*))

ポイントのみ

ポイント＋オブジェクト

[k-okada]

ありがとうございます．見方がようやくわかった．#299 でなおしました．