, R'deki OO programlama stili bir Python programlayıcısına okunabilir mi?

Question

CRAN'da logging package'un yazarıyım, kendimi bir R programcısı olarak görmüyorum, bu yüzden Python standard logging package ile kod uyumlu olarak yapmaya çalıştım, ama şimdi bir sorum var. ve umarım bana daha fazla R öğrenme şansı verir!

, hiyerarşik kaydedicilerle ilgilidir. Python ben günlüğü kayıtları bir logger oluşturmak ve göndermek olacaktır:

Benim R pakette

l = logging.getLogger("some.lower.name") 
l.debug("test") 
l.info("some") 
l.warn("say no") 

yerine size mesaj göndermek için bir logger değilsiniz, argümanları biri adıdır bir işlevi çağırmak logger.

logdebug("test", logger="some.lower.name") 
loginfo("some", logger="some.lower.name") 
logwarn("say no", logger="some.lower.name") 

sorun gibi bir şey logger adı onu bir kayıt mesajı göndermek istediğiniz her zaman tekrarlamak zorunda olmasıdır. Kullanıcıların bu yaklaşım R nasıl

... Ben

logdebug <- curry(logging::logdebug, logger="some.lower.logger") 

gibi, ben de kısmen uygulanan fonksiyon nesnesi oluşturmak ve bunun yerine çağırabilir, bir şey düşünüyordum ama sonra tüm hata ayıklama işlevleri için bunu yaparken gerek ?

Answer 1

bir referans sınıfına ?setRefClass için bir iş gibi ?ReferenceClasses

Logger <- setRefClass("Logger", 
        fields=list(name = "character"), 
        methods=list(
        log = function(level, ...) 
          { levellog(level, ..., logger=name) }, 
        debug = function(...) { log("DEBUG", ...) }, 
        info = function(...) { log("INFO", ...) }, 
        warn = function(...) { log("WARN", ...) }, 
        error = function(...) { log("ERROR", ...) } 
        )) 

ve sonra

> basicConfig() 
> l <- Logger$new(name="hierarchic.logger.name") 
> l$debug("oops") 
> l$info("oops") 
2011-02-11 11:54:05 NumericLevel(INFO):hierarchic.logger.name:oops 
> l$warn("oops") 
2011-02-11 11:54:11 NumericLevel(WARN):hierarchic.logger.name:oops 
> 

Answer 2

Neden adı tekrarlıyorsunuz? Işlevi doğrudan log-nesnesi geçirmek için daha uygun bir tek fonksiyonların bir dizi bağlantı kullanmak yol bit

logdebug("test",logger=l) 
# or 
logdebug("test",l) 

yani olacaktır. Bu sanırım daha çok R yolu gibi görünüyor.

Answer 3

Bu proto paketi ile yapılabilir geliyor. Gelen

> basicConfig() 
> l <- Logger.$new(name = "hierarchic.logger.name") 
> l$warn("this may be bad") 
2011-02-28 10:17:54 WARNING:hierarchic.logger.name:this may be bad 
> l$error("this definitely is bad") 
2011-02-28 10:17:54 ERROR:hierarchic.logger.name:this definitely is bad 

: Bu Ar eski sürümlerini (onun etrafında yıldır) destekleyen yüzden R. vs eski yeni versiyonlarının bir sorun olmazdı

library(proto) 
library(logging) 

Logger. <- proto(
     new = function(this, name) 
      this$proto(name = name), 
     log = function(this, ...) 
      levellog(..., logger = this$name), 
     setLevel = function(this, newLevel) 
      logging::setLevel(newLevel, container = this$name), 
     addHandler = function(this, ...) 
      logging::addHandler(this, ..., logger = this$name), 
     warn = function(this, ...) 
      this$log(loglevels["WARN"], ...), 
     error = function(this, ...) 
      this$log(loglevels["ERROR"], ...) 
) 
basicConfig() 
l <- Logger.$new(name = "hierarchic.logger.name") 
l$warn("this may be bad") 
l$error("this definitely is bad") 

Bu çıktıyı verir Yukarıdaki protokolde sadece protokolün üst katmanında prototip var, ancak her bir loglama nesnesini bir proto-nesnesine dönüştürmek mümkün olacaktı, yani her ikisi de olacaktı, çünkü hem log hem de cis nesneleri R ortamları. Bu ekstra katmandan kurtulacaktı.

Daha fazla bilgi için http://r-proto.googlecode.com'a bakın.