r - パッケージのソーシング時に R の S3 メソッドのディスパッチが機能しない

Question

現在、devtools の「ヘルプ」を使用して R でパッケージを開発しています。つまりload_all(path = ...)、この段階でパッケージが R スタジオに読み込まれ、R ディレクトリの関数が利用可能になります。ここまでは順調ですね。しかし、パッケージ内に単純な S3 階層を実装しようとすると、ディスパッチが機能せず、次のエラーがスローされます。

UseMethod("generic_function", obj) のエラー: クラス "c('data.frame', 'myclass')" のオブジェクトに適用される 'generic_function' に適用可能なメソッドがありません

ただし、同じジェネリック関数とそのメソッドを実装し、それらを現在の環境に明示的にロードすると、ディスパッチが機能します。

ここでボンネットの下で何が起こっているのかを説明することはできません。パッケージをロードするとディスパッチは機能しませんが、環境で「オンザフライでロード」すると機能します。

私はあなたの助けに感謝します。ブラジル

...コードを要求したとおり：

scaler <- function (solvertraj, ...) {
  UseMethod("scaler", solvertraj)
}

scaler.scale_multi <- function(solvertraj, ...){
  resls = list()
  ls = c("incumbant", "average.fitness")
  min_inc = min(solvertraj$incumbant)
  max_inc = max(solvertraj$incumbant)
  
  for(i in 1:length(ls)){
    tobe_scaled = ls[i]
    tmp = sapply(solvertraj[tobe_scaled], function(x){
      (x-min_inc) / (max_inc -min_inc)
    })
    resls[[i]] = tmp
  }
  #attr(solvertraj,'MIN_MAX_scaled') <<- TRUE
  return(resls)
} 

scaler.scale_other <- function(solvertraj, ...){
  res = list()
  plls = list()
  shapirols = list()
  resls = list()
  ls = c("incumbant", "average.fitness")
  
  for(i in 1:length(ls)){
    col = ls[i]
    # 1) shrink range
    tmp = sapply(solvertraj[col], function(x){
      x - min(solvertraj["incumbant"])
    })
    # 2) use natural logarithm
    tmp_2 = sapply(tmp, log)
    tmp_2[length(tmp_2)] <- 0L
    res[[i]] = tmp_2
    
    # TODO: fix
    plot_trans = plot(density(tmp_2))
    plls[[i]] = plot_trans
    
    tmp_test = shapiro.test(tmp_2)
    shapirols[[i]] <- tmp_test
  }
  
  resls = list.append(resls,
                      scales = res,
                      plots = plls,
                      shapirols = shapirols)

  #attr(solvertraj,'SHRINKAGE_scaled') <<- TRUE
  return(resls)
}