/// <summary>四元数純第1成分</summary>
        public static Tensor QuaternionPureR(Tensor X)
        {
            Function function = new Functions.Quaternion.QuaternionPureR();

            Shape y_shape = function.OutputShapes(X.Shape)[0];

            Tensor y = new Tensor(y_shape);

            function.Execute(new Tensor[] { X }, new Tensor[] { y });

            return(y);
        }
        /// <summary>四元数純第1成分</summary>
        public static VariableNode QuaternionPureR(VariableNode X)
        {
            Function function = new Functions.Quaternion.QuaternionPureR();

            return(Apply(function, X)[0]);
        }