Insert Youtube link if link exists in R











up vote
0
down vote

favorite












I have this tibble:



structure(list(stem = "In what place was Christmas once illegal?", 

    img_vid = "Enter Link", correct = "Russia", d1 = "Brazil", 

    d2 = "England", d3 = "France", exp = "Enter Explanation", 

    exp_img_vid = "Enter Link"), row.names = c(NA, -1L), class = c("tbl_df", 

"tbl", "data.frame"), spec = structure(list(cols = list(stem = structure(list(), class = c("collector_character", 

"collector")), img_vid = structure(list(), class = c("collector_character", 

"collector")), correct = structure(list(), class = c("collector_character", 

"collector")), d1 = structure(list(), class = c("collector_character", 

"collector")), d2 = structure(list(), class = c("collector_character", 

"collector")), d3 = structure(list(), class = c("collector_character", 

"collector")), exp = structure(list(), class = c("collector_character", 

"collector")), exp_img_vid = structure(list(), class = c("collector_character", 

"collector"))), default = structure(list(), class = c("collector_guess", 

"collector"))), class = "col_spec"))


I'd like to embed a Youtube video inside a RMarkdown if the link for the video exists in the columns img_vid and exp_img_vid .



I was thinking of using if statements, but how would I do so if the syntax for embedding links is
![Video Title](Video Link)



Thanks,






r r-markdown







share|improve this question






















  • You can try to construct require character string first and then use htmltools::HTML function
    – NT_
    Nov 10 at 20:24










  • Okay, i get the part about using htmltoos::HTML function. How do you "construct require character strings?"
    – JasonBaik
    Nov 10 at 20:28















up vote
0
down vote

favorite












I have this tibble:



structure(list(stem = "In what place was Christmas once illegal?", 

    img_vid = "Enter Link", correct = "Russia", d1 = "Brazil", 

    d2 = "England", d3 = "France", exp = "Enter Explanation", 

    exp_img_vid = "Enter Link"), row.names = c(NA, -1L), class = c("tbl_df", 

"tbl", "data.frame"), spec = structure(list(cols = list(stem = structure(list(), class = c("collector_character", 

"collector")), img_vid = structure(list(), class = c("collector_character", 

"collector")), correct = structure(list(), class = c("collector_character", 

"collector")), d1 = structure(list(), class = c("collector_character", 

"collector")), d2 = structure(list(), class = c("collector_character", 

"collector")), d3 = structure(list(), class = c("collector_character", 

"collector")), exp = structure(list(), class = c("collector_character", 

"collector")), exp_img_vid = structure(list(), class = c("collector_character", 

"collector"))), default = structure(list(), class = c("collector_guess", 

"collector"))), class = "col_spec"))


I'd like to embed a Youtube video inside a RMarkdown if the link for the video exists in the columns img_vid and exp_img_vid .



I was thinking of using if statements, but how would I do so if the syntax for embedding links is
![Video Title](Video Link)



Thanks,






r r-markdown







share|improve this question






















  • You can try to construct require character string first and then use htmltools::HTML function
    – NT_
    Nov 10 at 20:24










  • Okay, i get the part about using htmltoos::HTML function. How do you "construct require character strings?"
    – JasonBaik
    Nov 10 at 20:28













up vote
0
down vote

favorite









up vote
0
down vote

favorite











I have this tibble:



structure(list(stem = "In what place was Christmas once illegal?", 

    img_vid = "Enter Link", correct = "Russia", d1 = "Brazil", 

    d2 = "England", d3 = "France", exp = "Enter Explanation", 

    exp_img_vid = "Enter Link"), row.names = c(NA, -1L), class = c("tbl_df", 

"tbl", "data.frame"), spec = structure(list(cols = list(stem = structure(list(), class = c("collector_character", 

"collector")), img_vid = structure(list(), class = c("collector_character", 

"collector")), correct = structure(list(), class = c("collector_character", 

"collector")), d1 = structure(list(), class = c("collector_character", 

"collector")), d2 = structure(list(), class = c("collector_character", 

"collector")), d3 = structure(list(), class = c("collector_character", 

"collector")), exp = structure(list(), class = c("collector_character", 

"collector")), exp_img_vid = structure(list(), class = c("collector_character", 

"collector"))), default = structure(list(), class = c("collector_guess", 

"collector"))), class = "col_spec"))


I'd like to embed a Youtube video inside a RMarkdown if the link for the video exists in the columns img_vid and exp_img_vid .



I was thinking of using if statements, but how would I do so if the syntax for embedding links is
![Video Title](Video Link)



Thanks,






r r-markdown







share|improve this question













I have this tibble:



structure(list(stem = "In what place was Christmas once illegal?", 

    img_vid = "Enter Link", correct = "Russia", d1 = "Brazil", 

    d2 = "England", d3 = "France", exp = "Enter Explanation", 

    exp_img_vid = "Enter Link"), row.names = c(NA, -1L), class = c("tbl_df", 

"tbl", "data.frame"), spec = structure(list(cols = list(stem = structure(list(), class = c("collector_character", 

"collector")), img_vid = structure(list(), class = c("collector_character", 

"collector")), correct = structure(list(), class = c("collector_character", 

"collector")), d1 = structure(list(), class = c("collector_character", 

"collector")), d2 = structure(list(), class = c("collector_character", 

"collector")), d3 = structure(list(), class = c("collector_character", 

"collector")), exp = structure(list(), class = c("collector_character", 

"collector")), exp_img_vid = structure(list(), class = c("collector_character", 

"collector"))), default = structure(list(), class = c("collector_guess", 

"collector"))), class = "col_spec"))


I'd like to embed a Youtube video inside a RMarkdown if the link for the video exists in the columns img_vid and exp_img_vid .



I was thinking of using if statements, but how would I do so if the syntax for embedding links is
![Video Title](Video Link)



Thanks,






r r-markdown




r r-markdown






share|improve this question













share|improve this question











share|improve this question




share|improve this question










asked Nov 10 at 19:49









JasonBaik

15710




15710












  • You can try to construct require character string first and then use htmltools::HTML function
    – NT_
    Nov 10 at 20:24










  • Okay, i get the part about using htmltoos::HTML function. How do you "construct require character strings?"
    – JasonBaik
    Nov 10 at 20:28


















  • You can try to construct require character string first and then use htmltools::HTML function
    – NT_
    Nov 10 at 20:24










  • Okay, i get the part about using htmltoos::HTML function. How do you "construct require character strings?"
    – JasonBaik
    Nov 10 at 20:28
















You can try to construct require character string first and then use htmltools::HTML function
– NT_
Nov 10 at 20:24




You can try to construct require character string first and then use htmltools::HTML function
– NT_
Nov 10 at 20:24












Okay, i get the part about using htmltoos::HTML function. How do you "construct require character strings?"
– JasonBaik
Nov 10 at 20:28




Okay, i get the part about using htmltoos::HTML function. How do you "construct require character strings?"
– JasonBaik
Nov 10 at 20:28

















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',
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


















StackExchange.ready(
function () {
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53242801%2finsert-youtube-link-if-link-exists-in-r%23new-answer', 'question_page');
}
);

Post as a guest















Required, but never shown






























active

oldest

votes













active

oldest

votes









active

oldest

votes






active

oldest

votes
















 

draft saved


draft discarded



















































 


draft saved


draft discarded














StackExchange.ready(
function () {
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53242801%2finsert-youtube-link-if-link-exists-in-r%23new-answer', 'question_page');
}
);

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







-

Popular posts from this blog

Florida Star v. B. J. F.

Image
Florida Star v. B. J. F. From Wikipedia, the free encyclopedia Jump to navigation Jump to search United States Supreme Court case Florida Star v. B. J. F. Supreme Court of the United States Argued March 21, 1989 Decided June 21, 1989 Full case name The Florida Star v. B. J. F. Citations 491 U.S. 524 ( more ) 109 S. Ct. 2603; 105 L. Ed. 2d 443; 1989 U.S. LEXIS 3120; 57 U.S.L.W. 4816; 16 Media L. Rep. 1801 Prior history The Florida Star v. B.J.F., 530 So.2d 286 (1988) Supreme Court of Florida; Florida Star v. B.J.F., 499 So.2d 883 (1986) Fla. Dist. Court of Appeals Holding Florida Stat. § 794.03 is unconstitutional to the extent it makes the truthful reporting of information that was a matter of public record unlawful, as it violates the First Amendment. Court membership Chief Justice William Rehnquist Associate Justices William J. Brennan Jr.  · Byron White Thurgood Marshall  · Harry Blac
Read more

Danny Elfman

Image
Danny Elfman From Wikipedia, the free encyclopedia Jump to navigation Jump to search Danny Elfman Elfman at the 2010 San Diego Comic-Con Born Daniel Robert Elfman ( 1953-05-29 ) May 29, 1953 (age 65) Los Angeles, California, U.S. Spouse(s) Bridget Fonda ( m.  2003) Children 1 Musical career Genres Rock [1] ska [2] new wave film music video game music Occupation(s) Composer, singer, songwriter, record producer Instruments Trombone guitar percussion vocals keyboards [3] Years active 1972–present Associated acts Oingo Boingo James Newton Howard Daniel Robert Elfman (born May 29, 1953) is an American composer, singer, songwriter, and record producer. Elfman first became known for being the lead singer and songwriter for the band Oingo Boingo from 1974 to 1995. He is well known for scoring films and television shows, particularly his frequent collabora
Read more

Retrieve a Users Dashboard in Tumblr with R and TumblR. Oauth Issues

Image
.everyoneloves__top-leaderboard:empty,.everyoneloves__mid-leaderboard:empty,.everyoneloves__bot-mid-leaderboard:empty{ height:90px;width:728px;box-sizing:border-box; } 0 I am trying to use the TumblR package in R to set up the Oauth Authentication to Retrieve a user's dashboard using the second example in tumblR documentation However I get the following error, it seems that using twitter others have been able to use a different function to get around this, but I am not finding the same function available for Tumblr. See twitter package for R authentication: error 401 My code consumer_key <- OKey consumer_secret <- SKey appname <- App_name tokenURL <- 'http://www.tumblr.com/oauth/request_token' accessTokenURL <- 'http://www.tumblr.com/oauth/acces_token'
Read more