remove a test if package is not installed

1 files changed, 1 insertions, 0 deletions

diff --git a/r-util.rb b/r-util.rb
index 3f0adf8..0a8dc8e 100644
--- a/r-util.rb
+++ b/r-util.rb
@@ -168,6 +168,7 @@ class RUtilTest < Test::Unit::TestCase
     files = []
     #plot
     [true,false].each do |fast_embedding|
+      next if fast_embedding==false and !@@rutil.package_installed?("smacof")
       random_file = "/tmp/feature_value_plot_random_fast#{fast_embedding}.svg"
       stratified_file = "/tmp/feature_value_plot_stratified_fast#{fast_embedding}.svg"
       pre_files [random_file, stratified_file]