my program is r I need the full code for this question

# Question 1 [2 pts] The displacement of a combustion engine is given by the volume displaced by the pistons in all the cylinders of the engine. Because the volume of a cylinder is the area of the base of the cylinder times the height of the cylinder, one gets the following expression for the displacement of a combustion engine: 1/4 x (D)^2 x stroke x number of cylinders where D is the diameter of the cylinder and stroke is the height run by the piston. The engine of a Chevrolet 350 V-8 has eight cylinders, each with a clinder base RADIUS of 2 inches and a stroke of 3.48 inches. Blinde 1.1 Use R to calculate the displacement in cubic inches for this engine 28 1.1 Use R to calculate the displacement in cubic inches for this engine 29 30 - '{r} > 31 diameter-NA # replace this by the correct value (diameter of base cylinder) 32 stroke-3.48 33 ncyl=8 34 disp=NA # replace this by a formula using the variables above 35 disp # print the disp variable (value of the displacement in cubic inches) 36 37 - 381 I 39 40 The value of the displacement in cubic inches isr disp'. 41 42 1.2 Use this cell of R code to calculate this displacement in cubic U AL A M1-Lecture-2.Rmdx questions-assignment1 (5).Rmd x Rintrol (2).Rmdx 2 H Knit on Save we a Knit C -Run - 40 The value of the displacement in cubic inches is 'r disp. 41 42 1.2 Use this cell of R code to calculate this displacement in cubic centimetres, 43 knowing that one inch is 2.54 centimetres: 44 45 - "*'{r} 46 47 48