function with for loop and variable creation
.everyoneloves__top-leaderboard:empty,.everyoneloves__mid-leaderboard:empty,.everyoneloves__bot-mid-leaderboard:empty{ height:90px;width:728px;box-sizing:border-box;
}
0
I made the following function:
library(magicfor)
aufsum_func <- function(stes_zu_mo, proz_teil, taggeld)
{
ko_mo_1 <- (4500+115)* stes_zu_mo*proz_teil
er_mo_1 <- (19.8/500*30)*taggeld*stes_zu_mo*proz_teil
magic_for(silent = T)
for(p in 1:200)
{
if(p==1)
{
aufsum_mo <- er_mo_1 - ko_mo_1
}
else if(p>1 & p<=22)
{
aufsum_mo <- er_mo_1 *p + aufsum_mo - ko_mo_1
}
else
{
aufsum_mo <- er_mo_1 *22 + aufsum_mo - ko_mo_1
}
put(aufsum_mo)
}
temp <- magic_result_as_dataframe(iter = F)
return(temp)
}
df_45_4 <- aufsum_func(stes_zu_mo=83230/12, proz_teil=0.4, taggeld=203)
df_45_5 <- aufsum_func(stes_zu_mo=83230/12, proz_teil=0.538, taggeld=203)
I always get the following error:
Error: object 'er_mo_1' not found
My question is why the object is not found? For me it looks like the function I wrote is jumping over the first two or even three Statements? otherwise the object should have been found by the function? So what I am doing wrong? Could you please help me to debug the function? I am quite new to writing functions so forgive me if the question is very easy to solve! :)
r function for-loop
asked Nov 23 '18 at 11:26
yaennu.syaennu.s
33
add a comment |
0
I made the following function:
library(magicfor)
aufsum_func <- function(stes_zu_mo, proz_teil, taggeld)
{
ko_mo_1 <- (4500+115)* stes_zu_mo*proz_teil
er_mo_1 <- (19.8/500*30)*taggeld*stes_zu_mo*proz_teil
magic_for(silent = T)
for(p in 1:200)
{
if(p==1)
{
aufsum_mo <- er_mo_1 - ko_mo_1
}
else if(p>1 & p<=22)
{
aufsum_mo <- er_mo_1 *p + aufsum_mo - ko_mo_1
}
else
{
aufsum_mo <- er_mo_1 *22 + aufsum_mo - ko_mo_1
}
put(aufsum_mo)
}
temp <- magic_result_as_dataframe(iter = F)
return(temp)
}
df_45_4 <- aufsum_func(stes_zu_mo=83230/12, proz_teil=0.4, taggeld=203)
df_45_5 <- aufsum_func(stes_zu_mo=83230/12, proz_teil=0.538, taggeld=203)
I always get the following error:
Error: object 'er_mo_1' not found
My question is why the object is not found? For me it looks like the function I wrote is jumping over the first two or even three Statements? otherwise the object should have been found by the function? So what I am doing wrong? Could you please help me to debug the function? I am quite new to writing functions so forgive me if the question is very easy to solve! :)
r function for-loop
asked Nov 23 '18 at 11:26
yaennu.syaennu.s
33
1
Not the error message I get:Error in magic_for(silent = T) : could not find function "magic_for"and some other undefined functions, but apparently no problem wither_mo_1
– Mr. T
Nov 23 '18 at 11:36
1
If I comment outmagic_for,put(aufsum_mo)andmagic_result_as_dataframeI don't get any error.
– Rui Barradas
Nov 23 '18 at 11:57
Sorry I usedlibrary(magicfor). With your suggestions where does the temp come from?
– yaennu.s
Nov 23 '18 at 12:23
add a comment |
0
0
0
I made the following function:
library(magicfor)
aufsum_func <- function(stes_zu_mo, proz_teil, taggeld)
{
ko_mo_1 <- (4500+115)* stes_zu_mo*proz_teil
er_mo_1 <- (19.8/500*30)*taggeld*stes_zu_mo*proz_teil
magic_for(silent = T)
for(p in 1:200)
{
if(p==1)
{
aufsum_mo <- er_mo_1 - ko_mo_1
}
else if(p>1 & p<=22)
{
aufsum_mo <- er_mo_1 *p + aufsum_mo - ko_mo_1
}
else
{
aufsum_mo <- er_mo_1 *22 + aufsum_mo - ko_mo_1
}
put(aufsum_mo)
}
temp <- magic_result_as_dataframe(iter = F)
return(temp)
}
df_45_4 <- aufsum_func(stes_zu_mo=83230/12, proz_teil=0.4, taggeld=203)
df_45_5 <- aufsum_func(stes_zu_mo=83230/12, proz_teil=0.538, taggeld=203)
I always get the following error:
Error: object 'er_mo_1' not found
My question is why the object is not found? For me it looks like the function I wrote is jumping over the first two or even three Statements? otherwise the object should have been found by the function? So what I am doing wrong? Could you please help me to debug the function? I am quite new to writing functions so forgive me if the question is very easy to solve! :)
r function for-loop
asked Nov 23 '18 at 11:26
yaennu.syaennu.s
33
I made the following function:
library(magicfor)
aufsum_func <- function(stes_zu_mo, proz_teil, taggeld)
{
ko_mo_1 <- (4500+115)* stes_zu_mo*proz_teil
er_mo_1 <- (19.8/500*30)*taggeld*stes_zu_mo*proz_teil
magic_for(silent = T)
for(p in 1:200)
{
if(p==1)
{
aufsum_mo <- er_mo_1 - ko_mo_1
}
else if(p>1 & p<=22)
{
aufsum_mo <- er_mo_1 *p + aufsum_mo - ko_mo_1
}
else
{
aufsum_mo <- er_mo_1 *22 + aufsum_mo - ko_mo_1
}
put(aufsum_mo)
}
temp <- magic_result_as_dataframe(iter = F)
return(temp)
}
df_45_4 <- aufsum_func(stes_zu_mo=83230/12, proz_teil=0.4, taggeld=203)
df_45_5 <- aufsum_func(stes_zu_mo=83230/12, proz_teil=0.538, taggeld=203)
I always get the following error:
Error: object 'er_mo_1' not found
My question is why the object is not found? For me it looks like the function I wrote is jumping over the first two or even three Statements? otherwise the object should have been found by the function? So what I am doing wrong? Could you please help me to debug the function? I am quite new to writing functions so forgive me if the question is very easy to solve! :)
r function for-loop
r function for-loop
asked Nov 23 '18 at 11:26
yaennu.syaennu.s
33
asked Nov 23 '18 at 11:26
yaennu.syaennu.s
33
edited Nov 23 '18 at 22:12
yaennu.s
asked Nov 23 '18 at 11:26
yaennu.syaennu.s
33
asked Nov 23 '18 at 11:26
yaennu.syaennu.s
33
asked Nov 23 '18 at 11:26
yaennu.syaennu.s
33
33
1
Not the error message I get:Error in magic_for(silent = T) : could not find function "magic_for"and some other undefined functions, but apparently no problem wither_mo_1
– Mr. T
Nov 23 '18 at 11:36
1
If I comment outmagic_for,put(aufsum_mo)andmagic_result_as_dataframeI don't get any error.
– Rui Barradas
Nov 23 '18 at 11:57
Sorry I usedlibrary(magicfor). With your suggestions where does the temp come from?
– yaennu.s
Nov 23 '18 at 12:23
add a comment |
1
Not the error message I get:Error in magic_for(silent = T) : could not find function "magic_for"and some other undefined functions, but apparently no problem wither_mo_1
– Mr. T
Nov 23 '18 at 11:36
1
If I comment outmagic_for,put(aufsum_mo)andmagic_result_as_dataframeI don't get any error.
– Rui Barradas
Nov 23 '18 at 11:57
Sorry I usedlibrary(magicfor). With your suggestions where does the temp come from?
– yaennu.s
Nov 23 '18 at 12:23
1
1
Not the error message I get:
Error in magic_for(silent = T) : could not find function "magic_for" and some other undefined functions, but apparently no problem with er_mo_1– Mr. T
Nov 23 '18 at 11:36
Not the error message I get:
Error in magic_for(silent = T) : could not find function "magic_for" and some other undefined functions, but apparently no problem with er_mo_1– Mr. T
Nov 23 '18 at 11:36
1
1
If I comment out
magic_for, put(aufsum_mo) and magic_result_as_dataframe I don't get any error.– Rui Barradas
Nov 23 '18 at 11:57
If I comment out
magic_for, put(aufsum_mo) and magic_result_as_dataframe I don't get any error.– Rui Barradas
Nov 23 '18 at 11:57
Sorry I used
library(magicfor). With your suggestions where does the temp come from?– yaennu.s
Nov 23 '18 at 12:23
Sorry I used
library(magicfor). With your suggestions where does the temp come from?– yaennu.s
Nov 23 '18 at 12:23
add a comment |
0
active
oldest
votes
Your Answer
StackExchange.ifUsing("editor", function () {
StackExchange.using("externalEditor", function () {
StackExchange.using("snippets", function () {
StackExchange.snippets.init();
});
});
}, "code-snippets");
StackExchange.ready(function() {
var channelOptions = {
tags: "".split(" "),
id: "1"
};
initTagRenderer("".split(" "), "".split(" "), channelOptions);
StackExchange.using("externalEditor", function() {
// Have to fire editor after snippets, if snippets enabled
if (StackExchange.settings.snippets.snippetsEnabled) {
StackExchange.using("snippets", function() {
createEditor();
});
}
else {
createEditor();
}
});
function createEditor() {
StackExchange.prepareEditor({
heartbeatType: 'answer',
autoActivateHeartbeat: false,
convertImagesToLinks: true,
noModals: true,
showLowRepImageUploadWarning: true,
reputationToPostImages: 10,
bindNavPrevention: true,
postfix: "",
imageUploader: {
brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
allowUrls: true
},
onDemand: true,
discardSelector: ".discard-answer"
,immediatelyShowMarkdownHelp:true
});
}
});
draft saved
draft discarded
Sign up or log in
StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
StackExchange.ready(
function () {
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53445842%2ffunction-with-for-loop-and-variable-creation%23new-answer', 'question_page');
}
);
Post as a guest
Required, but never shown
0
active
oldest
votes
0
active
oldest
votes
active
oldest
votes
active
oldest
votes
draft saved
draft discarded
Thanks for contributing an answer to Stack Overflow!
- Please be sure to answer the question. Provide details and share your research!
But avoid …
- Asking for help, clarification, or responding to other answers.
- Making statements based on opinion; back them up with references or personal experience.
To learn more, see our tips on writing great answers.
draft saved
draft discarded
Sign up or log in
StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
StackExchange.ready(
function () {
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53445842%2ffunction-with-for-loop-and-variable-creation%23new-answer', 'question_page');
}
);
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
1
Not the error message I get:
Error in magic_for(silent = T) : could not find function "magic_for"and some other undefined functions, but apparently no problem wither_mo_1– Mr. T
Nov 23 '18 at 11:36
1
If I comment out
magic_for,put(aufsum_mo)andmagic_result_as_dataframeI don't get any error.– Rui Barradas
Nov 23 '18 at 11:57
Sorry I used
library(magicfor). With your suggestions where does the temp come from?– yaennu.s
Nov 23 '18 at 12:23