"下付き文字の境界"の実行時に適用す）TERR、平R

Question

また、以下のコードSpotfire専門として"RスクリプトTibco企業のランタイムR":

mydata_broken <- structure(
  list(
    Var1 = list(3.99083333270391, 3.99083333270391, 3.99083333270391, 3.99083333270391), 
    Var2 = list(3.99083333270391, 3.99083333270391, 3.99083333270391, 3.99083333270391)), 
  row.names = c("1", "2", "3", "4"), 
  class = "data.frame", 
  out.attrs = list(dim = c(2L, 2L), 
                   dimnames = list(
                     Var1 = c("Var1=3.99083333270391", "Var1=3.99083333270391"), 
                     Var2 = c("Var2=3.99083333270391", "Var2=3.99083333270391")
                     )
                   )
  )

mydata_ok <- structure(
  list(
    Var1 = list(3.99083333270391), 
    Var2 = list(3.99083333270391)), 
  row.names = "1", 
  class = "data.frame", 
  out.attrs = list(dim = c(1L, 1L), 
                   dimnames = list(
                     Var1 = "Var1=3.99083333270391", 
                     Var2 = "Var2=3.99083333270391")
                   )
  )

out <- apply(mydata_broken, 1, function(y) mean(as.numeric(y)))

を取得します以下のようなエラーメッセージ:

TIBCO企業Runtime R返されるエラー:'エラーに拡大。名(x):下付き文字範囲外に'.でSpotfire.Dxp.データです。DataFunctions.執行者.LocalFunctionClient.OnExecuting(FunctionClient funcClient)

(他のスタックトレースは省略)

しかし、同じコードを正平R.に交換すれば mydata_broken と mydata_ok の呼び出し apply(), ものとして期待（TERRプレーしていただきます。

いたってこれまで:

• 使用 yy の代わりに y の匿名の機能の提供 apply() （弾かネーミングの問題 y)
• す local({...}) ブロックでチェックをRとが示唆された なぜ"添え字の範囲外エラーにピカピカなR?

版&設定情報

• Spotfire5.5.0、版5.5.0.31を構築し、日:22.05.2013
• R版3.0.2、64bit版(2013-09-25)
• Windows7 64bit

なので、私の質問は私作ろ間違い。※この記事のオリジナルはこのバグのSpotfire R runtime?

更新 思再開という問いがあったから、ああいう実行可能な回避策からSpotfire支援ていただきたいと思いますように追加するとしています。

Answer 1

こちらは短に対応からもらったSpotfire支援

• でもプログラムにバグTERR(どうやら、TERRは読むことのできる、 list() 構造を適切に起こした断層の寸法をステレオ系統のマトリックスしたことから作成);彼らは現在、最先端の技術を駆使し
• 回避策として、利用できる c() の代わりに list() のデータの定義付けを行います。

改定義のデータを作ることTERR

mydata_working <- structure(
    list(
      Var1 = c(3.99083333270391, 3.99083333270391, 3.99083333270391, 3.99083333270391), 
      Var2 = c(3.99083333270391, 3.99083333270391, 3.99083333270391, 3.99083333270391)), 
    row.names = c("1", "2", "3", "4"), 
    class = "data.frame", 
    out.attrs = list(dim = c(2L, 2L), 
                     dimnames = list(
                       Var1 = c("Var1=3.99083333270391", "Var1=3.99083333270391"), 
                       Var2 = c("Var2=3.99083333270391", "Var2=3.99083333270391")
                       )
                     )
    )