search for: fdata

...(cbind(x=c(129,109,52,118,217,278,606,198,99,133),y=c(89,118,99,137,34,14,130,30,131,30))) > testdata x y 1 129 89 2 109 118 3 52 99 4 118 137 5 217 34 6 278 14 7 606 130 8 198 30 9 99 131 10 133 30 I have write a simple function (nonsense): > f.fun<-function(var,fdata) { fdata<-data.frame(fdata) fit<-lm(y~1,data=fdata) f.addterm<-function(x,fit,f.data) { fdata<-f.data fff<-paste('~.',x,sep='+') try(addterm(fit,as.formula(fff))$AIC[2]) } f.addterm(var,fit,fdata) } This function simply add t...

...num; } ForeachRemoveRangeData; -static gboolean swfdec_as_array_foreach_remove_range (SwfdecAsObject *object, +static gboolean +swfdec_as_array_foreach_remove_range (SwfdecAsObject *object, const char *variable, SwfdecAsValue *value, guint flags, gpointer data) { ForeachRemoveRangeData *fdata = data; @@ -122,7 +134,8 @@ static gboolean swfdec_as_array_foreach_ } static void -swfdec_as_array_remove_range (SwfdecAsArray *array, gint32 start_index, gint32 num) +swfdec_as_array_remove_range (SwfdecAsArray *array, gint32 start_index, + gint32 num) { SwfdecAsObject *object = SWFDEC...

Hello, I have programmed in PHP a lot, and wanted to know if anyone figured out Variable variables using R. For example, I have several dataframes of unequal sizes that relate to L treatments (1, 2, 3, 4, 5,6, L) ... in this case L=7 fData.1 unique.1 fit.nls.1 summary.nls.1 fit.var.1 summary.var.1 ..... fData.2 unique.2 fit.nls.2 summary.nls.2 fit.var.2 summary.var.2 ..... fData.L unique.L fit.nls.L summary.nls.L fit.var.L summary.var.L ========= I want to do something like for(i in 1:L-1) { dataStr = gsub(' ','',pa...

...I understand the process of obtaining the internal integer codes for the raw values of a factor (using as.numeric() as below), but what is the best way to obtain these codes for the levels() of a factor (since the as.numeric() results don't really make clear which code maps to which level)? fdata<-factor(c("b","b","c","a","b","c"),labels=c("I","II","III")) fdata levels(fdata) as.numeric(fdata) I thought something like this would make sense and work, but it throws an error: as.numeric(levels(fdat...

...foreach loop, use special case when removing just one variable if (num == 1) { swfdec_as_object_delete_variable (object, - swfdec_as_double_to_string (object->context, start_index)); + swfdec_as_integer_to_string (object->context, start_index)); } else { ForeachRemoveRangeData fdata = { start_index, num }; swfdec_as_object_foreach_remove (object, @@ -208,7 +208,7 @@ swfdec_as_array_foreach_move_range (SwfdecAsObject *object, return variable; if (idx >= fdata->start_index && idx < fdata->start_index + fdata->num) { - return swfdec_as_dou...

...num; } ForeachRemoveRangeData; -static gboolean swfdec_as_array_foreach_remove_range (SwfdecAsObject *object, +static gboolean +swfdec_as_array_foreach_remove_range (SwfdecAsObject *object, const char *variable, SwfdecAsValue *value, guint flags, gpointer data) { ForeachRemoveRangeData *fdata = data; @@ -122,7 +134,8 @@ static gboolean swfdec_as_array_foreach_ } static void -swfdec_as_array_remove_range (SwfdecAsArray *array, gint32 start_index, gint32 num) +swfdec_as_array_remove_range (SwfdecAsArray *array, gint32 start_index, + gint32 num) { SwfdecAsObject *object = SWFDEC...

...1 3 9.762092 4015.00 ALASKA 2 1 10.221640 532.00 ALASKA 2 2 10.169600 544.00 ALASKA 2 3 10.101300 539.00 I would like to adjust "income" by population ("popul") for each state. I can use: statepop<-tapply(fdata$popul,fdata$state,sum), which gives: ALABAMA ALASKA 53590.130 7435.263 I can find the weights: popweight <- statepops/sum(statepops) ALABAMA ALASKA 0.016327564 0.002265338 Is there an efficient way to multiply each entry of "income" by "popweght" c...

I have got a list named "filtered", I would like to construct alist named "fdata" as following: fdata <- cbind(matrix(unlist(filtered),ncol=28), myregime) If I try names(filtered), it gives all the correct name for each vector, but if I try names(fdata), it appears "filtered[[1]]" "filtered[[2]]" ..., How can I keep the name in "fdata&quo...

...c b/libswfdec/swfdec_as_array.c index cc03b03..f6314a7 100644 --- a/libswfdec/swfdec_as_array.c +++ b/libswfdec/swfdec_as_array.c @@ -109,13 +109,13 @@ static gboolean swfdec_as_array_foreach_ const char *variable, SwfdecAsValue *value, guint flags, gpointer data) { ForeachRemoveRangeData *fdata = data; - gint32 index; + gint32 idx; - index = swfdec_as_array_to_index (variable); - if (index == -1) + idx = swfdec_as_array_to_index (variable); + if (idx == -1) return FALSE; - if (index >= fdata->start_index && index < fdata->start_index + fdata->num) +...

...nt set_rcvarray_entry(struct hfi1_filedata *fd, struct tid_user_buf *tbuf, u32 rcventry, struct tid_group *grp, u16 pageidx, unsigned int npages); -static int tid_rb_insert(void *arg, struct mmu_rb_node *node); static void cacheless_tid_rb_remove(struct hfi1_filedata *fdata, struct tid_rb_node *tnode); -static void tid_rb_remove(void *arg, struct mmu_rb_node *node); -static int tid_rb_invalidate(void *arg, struct mmu_rb_node *mnode); +static bool tid_rb_invalidate(struct mmu_interval_notifier *mni, + const struct mmu_notifier_range *range, + u...

....status: creating openh323u.mak config.status: creating Makefile config.status: creating include/openh323buildopts.h [root@kamran openh323]# make opt set -e; make -C src opt; make -C samples/simple opt; make[1]: Entering directory `/openh323/src' g++ -DP_LINUX=2.6.5-1.358 -ffunction-sections -fdata-sections -D_REENTRANT -Wall -fPIC -DP_USE_PRAGMA -DPHAS_TEMPLATES -I/pwlib/include/ptlib/unix -I/usr/include/pwlib -DPTRACING -I/openh323/include -DHAS_OSS -DPTRACING -I/pwlib/include -fPIC -DP_USE_PRAGMA -Os -DNDEBUG -x c++ -c h225_1.cxx -o /openh323/lib/obj_linux_x86_r/h225_1.o g++ -DP_LINUX=2...

...nt set_rcvarray_entry(struct hfi1_filedata *fd, struct tid_user_buf *tbuf, u32 rcventry, struct tid_group *grp, u16 pageidx, unsigned int npages); -static int tid_rb_insert(void *arg, struct mmu_rb_node *node); static void cacheless_tid_rb_remove(struct hfi1_filedata *fdata, struct tid_rb_node *tnode); -static void tid_rb_remove(void *arg, struct mmu_rb_node *node); -static int tid_rb_invalidate(void *arg, struct mmu_rb_node *mnode); +static bool tid_rb_invalidate(struct mmu_range_notifier *mrn, + const struct mmu_notifier_range *range, + unsi...

Hi there, When I compile my code with -fdata-sections and -ffunction-sections, I still see some unused string in my shared library (Android). Actually, the strings appear together inside a .rodata.str1.1 section instead of getting their own section. It seems that the C-string literal are considered differently than other constant and the -fda...

...t_last_error end end end def self.delete(dirname) unless RemoveDirectory(dirname) raise ArgumentError, get_last_error end end # Blend entries and foreach into one method def self.entries(dirname) dirname += "\\*" fdata = 0.chr * 320 # 580 if wide array = block_given? ? [] : nil hfind = FindFirstFile(dirname, fdata) if hfind == INVALID_HANDLE_VALUE raise ArgumentError, get_last_error end file = fdata[44, MAX_PATH].unpack("Z*")[0] if block_given?...

...;Languages like C or C++ > require each variable, including multiple instances of the same variable > in recursive calls, to have distinct locations, so using this option > results in non-conforming behavior."). Non-confirming in the sense of C/C++ standard? How is it related to the -fdata-sections implementation? > With (-fmerge-constants or -fmerge-all-constants) & -fdata-sections, string literals are placed in .rodata.xxx.str1.1 > https://gcc.gnu.org/bugzilla/show_bug.cgi?id=192#c16 > This is, however, suboptimal because the cost of a section header > (sizeof(Elf...

...he simulation continues to run, except when the internal call (internal to nls) of the chol2inv fails. ============================================ Error in chol2inv(object$m$Rmat()) : element (2, 2) is zero, so the inverse cannot be computed In addition: Warning messages: 1: In nls(myModel.nlm, fData, start = initialValues, control = nls.control(warnOnly = TRUE), : number of iterations exceeded maximum of 50 2: In nls(myModel.nlm, fData, start = initialValues, control = nls.control(warnOnly = TRUE), : singular gradient =========================================================== Any sugge...

...again, what actual > advantages for ELF or COFF have been created by the atom model? Mach-O > hardly counts as it doesn't allow the flexibility of the section model > as has been discussed before. > The atom model is optimized when you compile the code with -ffunction-sections and -fdata-sections. Once targets start having -fno-unique-section-names as the default the atom model looks more promising. Everyone likes to have the image size small, and making -ffunction-sections/-fdata-sections (or) -fno-unique-section-names the default make sense and the atom model design directly...

...VE THIS ERROR: [root@pbx asterisk-oh323-0.7.0]# make for x in wrapper asterisk-driver; do make -C $x build || exit 1 ; done make[1]: Entering directory `/root/asterisk-oh323-0.7.0/wrapper' ./check_ver /root/pwlib pwlib ./check_ver /root/openh323 openh323 g++ -DP_USE_PRAGMA -ffunction-sections -fdata-sections -D_REENTRANT -DOPENSSL_NO_KRB5 -Wall -fPIC -I/root/pwlib/include -DPTRACING -I/root/openh323/include -DHAS_OSS -Wall -x c++ -Os -DWRAPTRACING -DWRAPTRACING_LEVEL=5 -DPWLIBVERSION=\"1.6.6\" -DOPENH323VERSION=\"1.13.5\" -I/root/pwlib/include/ptlib/unix - I/root/pwlib/i...

Hi All, I have a problem with rbind. I have data that consist of weight height .. etc of 1000 patients. I would like to find the mean and the standard deviation ( for the weight , height etc) for each gender. data<-read.table("data.txt", header=T, sep='\t') fdata=NULL for (i in 1:50){ nn<-names(X)[i] m<-tapply(X[,i],data$gender,mean,na.rm=T) s<-tapply(X[,i], data$gender, sd,na.rm=T) p<-cbind(mean=m,sd.dev=s) cn<-paste(nn,colnames(p),sep="_") colnames(p)<-cn fdata<-rbind(fdata,p) } write.table(fdata, ?results.txt?,sep...

..._as_object_free_property (NULL, var, object); } +typedef struct { + SwfdecAsObject * object; + SwfdecAsVariableForeach func; + gpointer data; + gboolean retval; +} ForeachData; + +static void +swfdec_as_object_hash_foreach (gpointer key, gpointer value, gpointer data) +{ + ForeachData *fdata = data; + + if (!fdata->retval) + return; + + fdata->retval = fdata->func (fdata->object, key, value, fdata->data); +} + +/* FIXME: does not do Adobe Flash's order for Enumerate actions */ +static gboolean +swfdec_as_object_do_foreach (SwfdecAsObject *object, SwfdecAsVariabl...